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Maquma 

Nuestro co/aborador Alberto Suffer has va a 
deleitar de nuevo con una de sus magnificos 
expticaciones de un programa en mdquina, paso a 
paso, y su equivafente en Basic, acerca de un asunto 
que poca gente conoce bien: c6mo se manipula el 
tedado en c6d/go mdquina, 
fodos hemos oFdo hob/or, a menudo on los 
pdginas de la revista, de fa Quinta Generacidn 
japonesa de ordenadares, y de que fa mayor 
dificultad para su advenimiento es el hardware, o 
era, porque la ¢(Conecction Machine, acaba de 
hater. 

/- Banco 
, de ,, h  .rue_as 
Saludamos desde aqu[ a un viejo conocido: el 
programa procesador de textos 
AM$1"RAD SEMANAL fo examind en su dia, pero 
ha aparecido una nueva versidn, casi integra en 
cddigo mquina y capaz de mane/at el segundo 
banco de memoria de/6128; de/a 64 Kbytes libres 
para texto, y creemos que merece la pena probarlo 
una vez ms. 

Serie Oro 

i tienes un Amstr=d, vacaciones y unos ratos 
perdidos para relal'arte a tus anchas, y e/ere#at tus 
neuronas, PUZZLEMIND es tu i'uego. 
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Primeros pasos . ' 

Dentro de nueslro esludio de/as interior/dodos de/ 
Amslrad Basic, estamos ya /isles para inlroducirnos 
en la comprensian y dominie de una de/as 
insrucciones de bifurcaon y decisidn mds 
sofislicadas y elegones que ex/sten, y que s/o los 
dialectos Basic que podr[amos Ilamar de 
poseen: la arden cON GOSUB. 

Nuestro co/aborador A/berlo Suffer nos va a 
dole/tar de nueva con una de sus magnificos 
explicac/anes de un programa en muina, paso a 
paso, y su euia/ente en Basic, acera de un asunto 
ue poca genie ¢onoce bien: came se man/#ula 
tedado en c6digo mdgu/na. 
Mainframes 
Togas homes o/do hab/ar, a menudo en /as 
pdginas de la rev/sta, de/a uinta Generac/6n 
/aponesa de ordenadores, y de que /a mayor 
dificuflad para su adven/mienlo es el hardware, o 
era, porque b ((Conecction Machine acaba de 

r 
ProgramAcci6n ' 
De nuevo los comandos ?SX vienen en nuestro 
auxilio para imp/ementar a/go que lodos /as 
programadores, sin excepci6n, y especia/menle /as 
de iuegos, agradecerdn en gran medido. Cd)mo 
hacer ¢¢s¢rolh de cua/quier porci6n de/a panta//a 
en /as cuotro direcciones, 

: Banco 
+ _ de pruebas 

Ealudamos desde aqu[ a un v/e/o conoddo: e/ 
programa procesador de lextos (Tasword;;, 
AMSTRAD SEMANAL Io examin6 en su d/a, pore 
ha aparecido una nueva vers/dn, casi integra en 
cadigo mSquina y capaz de mane/or e/ segundo 
banco de memoria de/128; de/a ,I Kbytes /ibres 
para exIo, y creemos que merece la pena probar/o 
una vez ms. 

Serie Oro 

¢i tienes un Amstrod, vacaciones y unos rates 
perdidos para re/a/arte a tus anchas, y e/ere#at tus 
neuronas, PUZZLEM/ND es tu juego. 



Gigontes te espero coco mortes en tu kiosco. Uno revisto impres- 
cindib/e poro todo oficionolo, Gigor, tes 
/timos noticios, los meCres fotos, los opiniones que te btereson, 
los enfrev/stos que esperos, 
los comenterios que fe gusto conocer. 
P[delo fodos los semonos, poque Gigentes 



e la mano de 
Mycrobyte nos Ilegan una serie de 
artefactos que, en mi opini6n, son 
imprescindibles para trabajar a pie- 
no rendimiento y con gran comodi- 
dad en tu ordenador. 
Mycrobyte parece ser una de las 
propias empresas que se ha moles- 
tado en abordar, y tratar de resol- 
ver, dos problemas que al final con- 
cluyen en Io mismo: 
-- la ergonomia 
-- el concepto de entorno de 
trabajo. 
Respecto al primero, estR muy de 
moda en estos dias, y viene a decir 
algo muy simple: ya que usted tiene 
que usar un ordenador, hRgalo con 
la mayor comodidad posible. 
El segundo expresa un aserto pa- 
recido: puestos a manejar un Ams- 
trad, organice racionalmente su es- 
pacio fisico de trabajo, de forma que 
el aprovechamiento y funcionalidad 
de Io que le rodee sea mRxima. 
Nuestro mrs caluroso aplauso al 
filtro de carbono de 14 pulgadas que 
presenta Mycrobyte; estR pensado 
para colocarse sobrepuesto a la pan- 
talla de un monitor de fasforo verde 
yes realmente efectivo: el agota- 
miento visual se ve reducido en gran 
medida, y resulta hasta placentero 
mirar el normalmente brillante y da- 
ino monitor. 
iCuidado! Tampoco hay que con- 
cluir que el usuario asiduo de un 
Amstrad f6sforo verde vaya a que- 
dar inevitablemente ciego a plazo fi- 
jo. Simplemente decimos que es un 
hecho demostrado que los monitores 
de ordenador dafian la vista, y que 
es una precauci6n sensata proteger- 
se de brillos y <duminotecnias. 
A la hora de organizar con efica- 
cia su espacio de trabajo, pocas co- 
sas mas Otiles hay que una sencilla 
plataforma de plRstico sobre la que 
se coloca la impresora, de tal modo 
que el ominoso taco de papel de 
la misma, se ubica justo debajo de 
ella, en el hueco dejado pot el sopor- 
te y la mesa. 
Esto puede parecer el cuento de 
Caperucita, pero al menos en mi me- 
sa de trabajo, normalmente atesta- 

UTENSlLIOS, 
UTENSILIOS 

da de papeles, articulos, fotos, etc, 
ha sido una especie de bendiciRn Pa- 
pal: aparentemente ineficaz pero re- 
sultona. No me atreveria a decir que 
yo no puedo estar sin 6b; sin embar- 
go, creo que es un elemento que de- 
biera estar, sin discusi6n, en cual- 
quier mesa de trabajo que incluya 
impresora con probabilidades de es- 
torbar. 
MRs cosas, iAh, si! Para mi gusto, 
el perlfrico estrella de esta noti- 
cia es... iuna percha! 
Cuando Io vi por primera vez, una 
especie de tira de plastico blanco, re- 
torcida de tal modo que nada tiene 

que envidiar a la mrs primorosa cin- 
ta de Moebius, mi perplejidad fue 
considerable; a punto estuve de Ila- 
mar a Microbyte para encargarme 
un par de trajes a buen precio. Afor- 
tunadamente, un examen un poco 
mas atento revel6 mi torpeza, por- 
que la percha es una gran idea que 
resuelve el dificil problema de hacer 
obvio Io importante e inaplazable en 
una mesa de trabajo: esta tira posee 
un velcro que se pega al ordenador 
y, ademRs, incluye un clip de plRsti- 

co que sujeta un indeterminado 
mero de papeles a dicha percha, de 
tal modo que es imposible no adver- 
tirlos. 
Entre usted y yo, as/record6 que 
tenia que escribir esta noticia. 
Cuando una revista, a travas de 
uno de sus redactores, alaba una se- 
rie de productos, inevitablemente 
surgen las suspicacias, sobre todo si 
el escritor se siente entusiasmado y 
sorprendido de aquello sobre Io que 
est6 escribiendo. 
Bien, me siento entusiasmado y 
sorprendido. Como el juicio de uno, 
a pesarde que sebase, como en es- 
te caso, en el continuado uso de los 
productos, simpre es subjetivo y dis- 
cutible, los lectores y usuarios juzgao 
rRn. De cualquier forma, creo que ya 

es hora de que alguien se diera cuen- 
ta que existen mrs cosas acerca del 
Amstrad aparte del software, por 
muy bueno que sea. 
Tema de precios: Ahi va: 
-- filtro carbono: 4.900+1VA 
-- portadocumentos (percha): 
714+1VA 
-- soporte impresora: 4.975 + IVA 
MICROBYTE estR en: 
San Gerardo, 59. Madrid 35. 
Tel.: (91) 656 50 02 



MAS RAPIDO 
Y ELEGANTE: 
ON GOSUB 

En un gran ndmero de programas se ofrece al 
usuario la posibilidad de elegir una de los 
opciones que aparecen en la pantalla. Es Io que se 
llama (MENU)). 
El Amstrad tiene preparada en su memoria una 
instrucci6n que nos va a permitir gestionar o 
tratar la elecci6n que hemos hecho de un modo 
r6pido y Ileno de claridad y sencillez. Se trata de 
ON GOSUB. 

a construcci6n y pre- 
sentaci6n en la pantalla de Io que hemos Ila- 
mado <dVII:NU no tiene par qu6 darle ya 
grandes problemas. Conociendo el manejo de 
los comandos LOCATE, PRINT, CLS, etc., po- 
dremos adaptar cualquiera a nuestras nece- 
sidades y gustos, asi coma hacer una presen- 
taci6n en la pantalla que sea est6lica, clara 
y agradable. 
Par ejemplo, mediante el Programa 1 con- 
seguiremos visualizar un <<men6 que has ofre- 
ce la posibilidad de escoger una entre cuatro 
operaciones aritmticas. 

La parte del programa que se encarga de 
recoger la opci6n elegida es la linea 80. Su 
misi6n es primero informarnos de que existe 
la posibilidad de decidirnos par una u olra, 
y despu6s recoge nuestra elecci6n una vez la 
hayamos tecleado y pulsemos RETURN. 
Y, d6nde la guarda? Se trata de una ins- 
trucci6n INPUT, asi que controle la variable 
que hay al final de la linea, <opci6n, y ve- 
r6 coma alli est6. Si quiere comprobarlo bas- 
ta con que aada al Programa: 
90 PRINT opci6n 
y ver6 que todo ha sucedido tal y coma se Io 
hemos comentado. 
Pero 6sta no es la utilidad de los <menOs. 
Aunque despu6s de la ejecuci6n del Progra- 
ma anterior, con la linea 90 incluida, nos apa- 
rezca en la pantalla la opci6n elegida, la ver- 

dad es que hasta ahora no hemos consegui- 
do casi nada. 
Para que sea Otil, el Programa deber6 en- 
caminarse hacia una subrutina que trate, o eje- 
cute de una manera en concreto, la acci6n que 
hayamos elegido. Recuerde que la opci6n se 
encuentra almacenada en la variable p- 
ci6nh 
Queremos decir con esto que deber6 ana- 
lizar el valor que contenga <gpcJ y de- 
pendiendo del que sea saltar6 a una linea de 
programa diferente a partir de la cual se eje- 
cutar6 la rutina correspondiente. 
Tradicionalmente esto se haria mediante una 
serie de sentencias del tipo: 
IF opci6n=n0mero THEN GOSUB linea 
Supongamos que la rutina que nos va a re- 
solver todas las sumas que queremos se en- 
cuentra a partir de la linea 1000, la de restar 
a partir de la 2000, la de multiplicar de la 3000 
y la de dividir de la 4000. Obtendriamos una 
serie de rutinas que muy esquem6ticamente 
odria ser alga parecido al Programa 2. 

onn PM PROP,AMA  l 
I n¢A PFM 

Antes de continuar le proponemos que mezo 
cle (con la instrucci6n MERGE) los dos progra- 
mitas anteriores, o bien se los teclee todo se- 
guido, uno a continuaci6n de afro de un tir6n 

y respetando sus respectivos nOmeros de linea. 
Una vez Io hayamos hecho, si suponemos 
que la operaci6n a realizar es la suma, ten- 
dremos que echar una ojeada al menO y se- 
guir sus instrucciones, es decir, pulsar la tecla 
nOmero 1 y a continuaci6n RETURN. 
La linea 80 adem6s de permitirnos introdu- 
cir datos desde el tedado, tambin asigna el 
valor que nosotros hayamos elegido en la va- 
riable <<opci6n. 
Y ahora Ilega el momenta en el que tendria- 
mos que dirigirnos a la subrutina de sumar, 
ya que 6sta es la opci6n elegida. Para ella bas- 
taria con aadir al programa la siguiente li- 
nea. 

90 GOSUB 1000 

y hacia alli iriamos. 



Ii 

Dill,-. 

Pero de esta manera siempre eslariamos su- 
mando dos o m6s n0meros, puesto que el sal- 
to a la subrutina de sumar se hace de un mo- 
do <in¢ondicional)), o sea, el programa 
salta todas las veces que Io ejecutemos a la 
misma rutina, ya que no analizamos ninguna 
condici6n que nos diga si debemos o no ha- 
cerlo. 
Vemos que el probJema estaria ahora en la 
Forma de encaminar nuestra elecci6n hacia al- 
guna de elias. Pero habiamos convenido en 
hacerJo mediante instrucciones IF... THEN, no 
e$ as[ . 
Pues manos a la obra. En vez de la linea an- 
terior, aadamos al programa esta otra or- 
den: 

90 IF opci6n=l THEN GOSUB 1000 

En ella primero analizamos si el valor que 
contiene la variable <op¢i6n) es igual a 1 
y en caso afirmativo el ordenador ejecuta Io 
que sigue a la palabra clave THEN: un salto 
a la rutina encargada de sumar. 
Y, .cu6ndo ocurrir6 asi? Pues cuando, co- 
ma hmos dicho anteriormente, hayamos pul- 
sado la tecla del 1 siguiendo los consejos del 
Men0. <<Opcign contiene un 1 y al cumplirse 
la condici6n de la linea 90, el programa va 
a la rutina que comienza en la 1000. 
A continuaci6n se ejecutar6n todas las ins- 
trucciones contenidas entre las Iineas 1000 y 
1030. Nosotros hemos colocado en elias una 
especie de sintesis de Io que alli ocurriria: s6- 
Io nos aparecer6 un mensaje en la pantalla. 
En realidad nos deberian pedir los sumandos, 
realizar la operaci6n y ofrecer o visualizar los 
resultados. Pero eso se Io dejamos coma ta- 
rea. iNo se olvide hacerla a su forma y medi- 
da!, ver6 coma saca unas muy buenas con- 
clusiones de sus propios experimentos. 
Siguiendo par la subrutina Ilegamos a la 
nea: 
1030 RETURN 
AI ejecutarla, el ordenador devuelve el con- 
trol al punto del programa situado inmedia- 
tamente detr6s del lugar desde donde se in- 
voc6 la subrutina, es decir, al final de la linea 
90, y a partir de alli continuar6 su ejecuci6n 
secuencial. 
Pero, qug pasa cuando no hayamos elegi- 
do la opci6n 1 del men0? El ordenador Ilega- 
r6, coma antes, a la linea 90. Ahora no se 
cumple la condici6n, ya queen opcigm es- 
tar6 almacenado un valor diferente de 1, y par 
tanto no se ejecutar6 Io que hay colocado des- 
pugs de THEN, sino que saltar6 a la linea si- 
guiente. 
Nuestro programa tendr6 que tratar este 
nuevo caso, asi que tendremos que aadirle 
nuevas instrucciones para que asi Io haga. 
Si teclemaos un 2, la opci6n que hemos ele- 
gido en esta ocasi6n es la operaci6n 
En la variable <opcim tendremos guarda- 
do el nOmero 2. 
La rutina que trata la resta es la que comien- 
za a partir de la linea 2000. Piense un poqui- 
to. C6mo tendria que set la que siga a la 90 
para que analice si opci6m tiene un 2 y que 
en caso de ser asi el programa salte a la ruti- 
na de restar? 
Seguro que se parece a: 
100 IF opci6n=2 THEN GOSUB 2000 
Y de la misma forma podemos generalizar 
esto al resto de operaciones y aadir al pro- 
grama que tenemos entre manos las siguien- 
tes lineas: 
110 IF opci6n=3 THEN GOSUB 3000 
Y 
120 IF opci6n=4 THEN GOSUB 4000 
y, par ejemplo, cuando pulsemos o elijamos 
la opci6n 3 del men0 el Amstrad, al Ilegar 

a la linea 110, encominar6 Io ejecuci6n del 
programa hacia la rutina de la linea 3000 y 
se pondr6 tranquilamente a multiplicar, tal co- 
ma su programador se Io ha indicado. 
Tenga en cuenta una cosa. En este Oltimo 
caso, cuando opci6n)) conlenga un 3, el 
programa pasa tambign par las Iineas 90, 100 
y 120, pero, dado que no se cumple ninguna 
de las condiciones alli recogidas, no se ejecu- 
ta la parte de la instrucci6n que sigue a THEN. 
Una vez que hayamos realizado la opera- 
ci6n elegida, si quiere que el ordenador vuel- 
va a ofrecer el menO al usuario para que 6ste 
contin0e efectuando operaciones, tendr6 que 
escribir una nueva Inea al programa. Basta- 
r6 con hacer un salto, de nuevo, a ia primera 
instrucci6n que has confeccione el men6: 
140 GOTO 20 
Haga todas las pruebas que quiera con es- 
te programa (el original m6s las lineas aadi- 
das) y cuando est6 seguro de su buen funcio- 
namienlo, sglvelo rgpidamente en una cinta 
o en un disco. 
Pero aunque trabaje correctamente y haga 
todo Io que le pidamos, el programa asi cons- 
truido presenta algunos inconvenientes que 
quiz6 has originen grandes problemas. 
Par ejemplo, el valor de la variable g- 
i no podr6 ser modificado en alguna de 
las subrutinas que realizan las operaciones 
propiamente dichas. En nuestro caso, esto no 
va a ocurrir nunca, pero quiz6 en alguna oca- 
si6n ser6 necesario hacerlo. 
Cuando asi ocurra, al retornar (tras RE- 
TURN) a una de las Ineas comprendidas en- 
tre la 90 y la 120, pudiera ser que se cumplie- 
ra ahora alguna de las condiciones restantes, 
con Io que el programa saltaria de nuevo a 
una opci6n no deseada. 
Para que Io yea de una manera rags grgfi- 
ca, aada la Inea: 
1025 opci6n=3 
y ejecutgmosle de nuevo, pulsando la tecla 1 
y RETURN para que la opci6n elegida sea la 
que hace sumas, o al menos as Io indica, y 
saltemos a la rutina de la linea 1000. 
En ella cambiamos el valor de i6 
(un 1) par 3, segOn la nueva linea 1025. 
AI retornar el programa principal Io hace- 
mos a la 100 para seguir linealmente. 
Recuerde que im contiene ahora un 
3. Asi que al Ilegar a la linea 110 resulta que 
se cumple la condici6n alli recogida y la eje- 
cuci6n salta a la rutina de multiplicar. 
Resumiendo, resulta que hemos elegido la 
opci6n 1 (SUMAR) y el programa pasar6 err6- 
neamente par dos operaciones: sumar y mul- 
tiplicar. Y todo ha sido debido a que hemos 
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alterado el valor de la variable opci6m es- 
cogido. M6s claro? 
Otro inconveniente radica en el hecho de 
que si existe un n0mero elevado de opciones, 
el programa contendria una cantidad de lineas 
semejantes a la 90 muy grande, y por tanto 
estaria ocupando una parte de la memoria 
que pudiera resultar necesaria para otras co- 
SOS. 
Adem6s la velocidad de ejecuci6n del pro- 
grama se veda disminuida en gran manera, 
ya que tendria que recorrer necesariamente 
todas los lineas que investigan si la variable 
¢op¢in Ileva un valor u otro para tratar- 
Io convenientemente. No importa que encuen- 
tre la que le corresponde, itiene que recorrer- 
los todas! 
Por ello es casi necesario encontrar una ins- 
trucci6n que nos resuelva en parte, o totalmen- 
te, estos inconvenientes. 
La mayoria de los lenguajes cientifico- 
tcnicos, poseen unas instrucciones o senten- 
cias (del tipo CASE) que solucionan situacio- 
nes similares. Dependiendo del valor almace- 
nado en una determinada variable, el control 
de ejecuci6n pasar6 a un punto u otto del pro° 
grama. Es de Io que se trata, no? 
Am*trod incorpora a su BASIC un coman- 
do de gran potencia con el que todos los pro- 
blemas que antes enunciabamos ser6n un poco 
ms pequeos y adem6s los programas en los 
que est6 contenida, estar6n dotados de una 
mayor velocidad de ejecuci6n. 
Y esta instrucci6n es: 
ON (en, con, sobre) GOSUB (Jr a la rutina) 
Naturalmente, cuando el ordenador se en- 
cuentre con esta instrucci6n, con poner la pre- 
posici6n ON no es suficiente, ya que tendre- 
mosque indicarle sobre qua, en qu 
o ((¢om qu6 criterio tendr que decidir ira 
una subrutina o a otra. 
Y para decirselo emplearemos una variable 
numrica o una expresi6n del mismo tipo que 
el micro pueda evaluar. Seg0n el valor que lo- 
ma esta variable (o expresi6n), el programa 
se encaminar hacia la rutina asociada a di- 
cho valor. 
Por tanto, con Io que tenemos hasta ahora 
tampoco seria suficiente. Tras la palabra cla- 
ve GOSUB habr que especificar cada uno 
de los n0meros de las lineas del programa a 
las que deseemos que salte la ejecuci6n de- 
pendiendo del valor de la expresi6n. 
Con esto bastaria. Por tanto, el formato 
completo de la sentencia seria: 
ON expresi6n GOSUB lista de n0meros de 
linea 
• C6mo decide ahora a cu61 de las lineas in- 
dicadas debe Jr? El Amstrod, al ejecutar una 
instrucci6n ON... GOSUB procede de la si- 
guiente forma: 
Primero evalga la expresi6n que hayamos 
colocado entre ON y GOSUB, es decir, cal- 
cula el valor num6rico que toma. En caso de 
ser una variable es evidente que la evaluaci6n 
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es bastante sencilla: es suficiente con tomar el 
valor que contiene. 
A continuoci6n puede tomar varios caminos. 
Si el resultado de los c61culos es cero, el orde- 
nador hace caso omiso de los nOmeros de li- 
nea que hay detr6s de GOSUB y la ejecuci6n 
del programa continOa secuencialmente por 
la linea siguiente. 
Para comprobarlo, teclee el Programa 3, 
que no debe presentarle ninguna dificultad: 

Cuando Io ejecute, en la pantalla le apare- 
cer6 un mensaje indicando qu es Io que ha- 
ce el ordenador: 
No hago el salto 
Por qu es as/? Observe, en la linea 20 da- 
mos a la variable (Ol¢im el valor 0. AI ha- 
ter la evaluaci6n de la expresi6n (en este ca- 
so variable solamente) en la linea 30 nos en- 
contramos que el resultado es cero, ya que es- 
to es Io que vale op¢i6n. 
Entonces, seg0n hemos dicho, el programa 
continuard por [a linea 40, la que nos visuali- 
za el mensaje, para que despu6s el progra- 
ma termine con el END de la 50. iNo ha pa- 
sado por la rutina de la Iinea 100! 
Sustituya la 20 por: 
20 opci6n = 20 
Ahora el valor de la expresi6n es superior 
al n0mero de lineas del prograrna citadas tras 
el OSUB. Qu6 pasar6? Ejec0telo. 
Aparentemente vemos que los consecuen- 
cias son las mismas que las obtenidas en el caso 
anterior, aunque ahora el resultado de la eva- 
luaci6n de (op¢i sea distinto de cero. 
Pues, cranos. Verdaderamente ocurre Io 
mismo en ambos casos. Asi que podemos re- 
sumir estos dos caminos en uno solo. Cuando 
el valor que toma opcJm sea igual a ce- 
ro o mayor que la cantidad de n0meros de li- 
nea colocados detrds del GOSUB, el Am*- 
trod actOa de la misma manera: no ocurre 
nada y la ejecuci6n continOa linealmente en 
la instrucci6n siguiente. 
Veamos los casos de verdad interesantes que 
ser6n aquellos en los que el ordenador salte 
a una de las subrutinas cuya linea de comien- 
zo sea una de las colocadas en esta nueva ins- 
trucci6n ON GOSUB. 
Si tras evaluar la expresi6n 6sta toma el va- 
lor 1, al Ilegar a una instrucci6n del tipo: 
ON... GOSUB 
el programa saltar6 a la subrutina que empie- 
za en la linea que est6 colocada en primer lu- 
gar tras el GOSUB. 
Sustituya en el Programa anterior la linea 
20 por: 
20 opci6n = 1 
para forzar a que la variable op¢i6n val- 
ga 1 cuando sea evaluada en la linea 30. 
Vea que si ejecuta el programa, con este 
cambio, si pasaremos por la subrutina que co- 
mienza en la linea 100, ya que ahora si se vi- 
sualiza: 
He hecho el salto 
aunque despu6s, al continuar el programa por 
la linea 40 tras recorrer la rutina, parezca que 
no ha sido asi por el mensaje contradictorio 
que nos aparece a continuaci6n. No le haga 
caso, analice este gltimo programa detenida- 
mente y vea y comprenda por qu6 es asi. 
Cuando el resultado de la evaluaci6n sea 2, 
el ordenador se encaminar6 hacia el ngmero 



de linea colocado en segundo lugar tras el 
GOSUB, si es que existe, y asi sucesivamen- 
te. 
Generalizando podriamos decir que si el va- 
lor de la variable o expresi6n est6 compren- 
dido entre 1 y el nOmero de lineas que haya- 
mos citado al final de ON... GOSUB, la eje- 
cuci6n del programa saltar6 a la linea situa- 
da (tras GOSUB, claro) en la posici6n indica- 
da por el valor de la variable. 
Le proponemos que con el Programa 4 rea- 
lice todas las pruebas que crea oportunas has- 
ta que le queden las ideas suficientemente cla- 
ras. 

RFM PRrtFPAMA IV 
INPUT "VAIOR F [A VARIAPIF: ",n 
nn 
NPUT "PULSA RFTI;RN PARA 
PRINT' HAS TFCi 
RFTURN 
PRINT"HAg TFCI 
RFTURN 
PRINT"HAS TFCIAO  " 
PFTURN 

En la linea 40 se encuentra el ON... GO- 
SUB. Observe que al final de esta linea s61o 
hay tres de comienzo de subrutinas, asi que 
para saltar a alguna de elias, la variable 
ci6m necesitara tener un valor comprendi- 
do entre 1 y 3. 

Pruebe tambin los valores cero y super/o- 
res a 3 y vea los resultados. 
En el caso de teclear un valor negativo o su- 
perior a 255, el tratamiento no es el mismo. 
Si el ordenador encuentra que <op¢i6m est6 
fuera del margen 0-255 nos contesta con un 
mensaje de error que deja las cosas suficien- 
temente claras: 
Improper argument in 40 
E×perimente estos valores en el Programa 
anterior. 
Y para despedirnos volvamos al Programa 
de las operaciones que result6 de la mezcla 
que hicimos al principio del articulo. 
Manteniendo una estructura semejante for- 
maremos ahora el Programa 4. Hemos susti- 
tuido todos los IF... THEN por un solo ON 
GOSUB. 
Cu61 de los dos le parece mas sencilloa. Vea 
c6mo funciona para cualquier valor que le te- 
cleemos. Esperamos que no encuentre ningu- 
na dificultad en ver c6mo trabaja. 
Naturalmente el uso de ON GOSUB no se 
limita 0nicamente a programas con men0s, pe- 
ro ste es un ejemplo muy claro e ilustrativo 
para comprender et funcionamiento de este 
nuevo comando. 
En poster/ores articulos se analizar6n otros 
de un funcionamiento parecido: ON GOTO, 
ON ERROR GOTO, y compaffia nos esperan. 
Les encontraremos?... 

t¢ ' PR|NT"ft't' ADIJI gF SIJMA 
IAA RFTIIRN 
2n RFM RFSTAR 
?nt CI S 
?A?r PRINT"lit APIJI SF RFSTA 
?nn RFTURN 
nnn RFM MU[IPI ICAR 
?n PRINTf AOUI gF Mill TIPI 
,, 
nn RFTURN 
nnn RFM 
4nn CI g 
5 n RFM FIN 

i estSs interesado en alg0n n0mero de los 
va publicados por Microhobby Amstrad, rea- 
' liza Joy mismo tu pedJdo porque ya hay algunos 
ejemplares agolados. 
No pierdas la oportunidad de disponer de la mejor 
obra publicada sobre ordenadores Amstrad. En todos 
sus n0meros encontrar,Ss interesantes articulos de inicia- 
ci6n, pokes, trucos, curso de c6digo m6quina, etc... 
jNo te pierdas detalle! 
Recorta o copia el cupdn que aparece cosAdo en /as p@inas 
de la revista. 
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LA LECTURA 
DEL TECLADO 

Entraremos hoy en el estudio de otro caprtulo 
im, por.tante dentro de la programaci6n en c6digo 
maqu:na, el manejo del teclado. Veremos c6mo se 
puede comprobar si una tecla est6 pulsada o no. 

J n el Amstrad el te- 
clado se lee cincuenta veces por se- 
gundo y se construye un buffer de te- 
clado en el cual se indica qu6 teclas 
est6n o no estnoulsadas. 
Para descifrar el teclado, existen 
tres niveles de operaci6n: el prime- 
ro de ellos se encarga de leer el te- 
clado, el siguiente nivel convierte ca- 
da una de las teclas pulsadas a nO- 
meros de teclas y el ltimo de estos 
niveles convierte dichos ngmeros en 
caracteres ASCII. 
En el presente capitulo hemos pre- 
parado dos programas que se encar- 
gan de chequear qu6 teclas se han 
pulsado. En concreto se observa la 
pulsaci6n de las teclas '1 ', '2' 6 '3'. 
Cada uno de estos programas uti- 
liza un sistema de lectura de teclado 
distinto. Uno de ellos utiliza el 
comando: 
INKEY$ 
el cual toma el valor ASCII de la te- 
cla que se ha pulsado y, por Io tan- 
to, distingue el car6cter de la tecla 
pulsada ya sea mayOscula o minos- 
cula. 
El otro sistema de lectura de tecla- 
do se realiza mediante el comando: 
INKEY 
que no trabaja con caracteres ASCII 
sino con n0meros de tecla. 
Vamos aver ahora c6mo escribi- 
riamos cada uno de los programas 
mencionados anteriormente en c6di- 
go m6quina. 

Estudiaremos en primer lugar c6- 
mo leer caracteres ASCII desde el 
lenguaje m6quina. Para ello utiliza- 
remos una rutina que nos proporcio- 
na el firmware. 
Dicha rutina se encarga de tomar 
del buffer de teclado el car6cter de 
la 61tima tecla pulsada y ste se co- 
Ioca en el registro A. 
TOMA UN CARACTER DEL BUF- 
FER DE TECLADO. #BB1B 
Toma el c6digo ASCII del car6cter 
que se ha pulsado desde teclado. Di- 
cha rutina no espera a que se pulse 
una tecla. 
Condiciones de entrada. 
No necesita ninguna condici6n. 
Condiciones de salida. 
Si se ha pulsado una tecla nos de- 
volver6 los siguientes resultados: 
Flag Carry verdadero. 
El registro A contiene el valor AS- 
CII de la tecla pulsada. 
Si no se ha pulsado ninguna tecla 
el resultado ser6: 
Flag Carry falso. 
Se corrompe el registro A. 
En cualquier caso se corrompen to- 
dos los flags y se preservan los de- 
m6s registros. 
Una vez realizada esta Ilamada 
deberemos comprobar si se han pul- 
sado alguna de las teclas que se han 
elegido. Primero comprobamos si se 
ha pulsado la tecla '1'. 
CP "1" 
JR Z, PRINT 
si dicha tecla se ha pulsado, enton- 
ces el flag Z estar6 a cero y se reali- 
zar6 la impresi6n en pantalla corres- 
pondiente. = 
A continuaci6n realizaremos la 
misma operaci6n con las restantes te- 
cIas. 

Cuando se entra en la rutina de im- 
presi6n, Io primero que hacemos es 
preservar el registro AF: 
PUSH AF 
para que una vez impreso el mensa- 
je podamos recuperarlo e imprimir- 
Io en pantalla, ya que el acumulador 
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contiene el car6cter leido desde te- 
clado: 
POP AF 
CALL #BBSA 
de esta forma en pantalla se impri- 
mir6 el n0mero que se haya pulsado 
desde teclado. 

MOr)E | 
TF TN)FY$ "|" THFN A J'.GOSIIR 
IF INVFY$-"?" THEN A=2:GOSUg 
IF INKY$-'3" THFN A 
I OCATF IA. 12:PRINT "Pill SAA I A 
A";A 
RETURN 

0 POKE N,A 
4n NFXT 
5( IF RUMA#'I92F THFN PRINT "FRROR 

Para leer nOmeros de teclas desde 
lenguaje m6quina, se utiliza otra ru- 
tina del firmware, la cual indica si se 
ha pulsado la tecla que se le ha indi- 
cado previamente en el acumulador. 
CHEQUEA SI SE HA PULSADO 
UNA TECLA. #BB1E 
Mira si se ha pulsado una tecla de- 
terminada o si se ha activado el joys- 
tick. 
Condiciones de entrada. 
El acumulador debe contener el 
n0mero de tecla que se desea che- 
quear. 
Condiciones de salida. 
Si se ha pulsado la tecla el flag de 
cero es falso. 
Si no se ha pulsado la tecla el flag 
de cero es verdadero. 
En cualquier caso se dev,Jelven los 
siguientes valores: 
El flag Carry falso. 
El registro C contiene el estado de 
la tecla SHIFT (MAYS). 
Los registros A y HL se corrompen, 
los dem6s son preservados. 
Asi pues, para chequear cada una 
de las teclas, deberemos cargar en 
el acumulador el nOmero de tecla de- 
seada y Ilamar a la rutina anterior- 
mente explicada. 

Dado queen primer lugar se de- 
sea mirar si se ha pulsado la tecla '1' 
(tecla n6mero 64), deberemos car- 
gar en el registro A dicho valor: 
LD A, 64 
CALL #BB1E 
a continuaci6n deberemos compro- 
bar si dicha tecla se ha pulsado, pa- 
ra ello observamos el estado del flag 
cero: 
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JR Z, PASt 
asi pues si Z est6 a cero, indica que 
no se ha pulsado, por el confrario si 
Z est6 a uno, dicha tecla se habr6 
pulsado desde el teclado. 
Ahora deberemos imprimirla en 
pantalJa, para ello cargaremos en el 
acumuJador el car6cter ASCII de di- 
cha fecla y lJamaremos a la rutina 
PRINT para que se emprima en pan- 
talla el nOmero correspondienfe: 
LD A, "I" 
JR PRINT 
Esla misma operaci6n deber6 
efectuarse con las teclas restantes, in- 
dicando en el acumulador el n0me- 
ro de cada una de dichas teclas. 
La rutina de impresi6n es exacta- 
mente igual a la utilizada en el ante- 
rior programa. 
Aparte de las dos rutina menciona- 
das para leer el teclado, existe otra 
que se encarga de leer el estado de 
los joysticks. 
Dicha rutina es: 
MIRA EL ESTADO DE LOS JOYS- 
TICKS. #BB24 
Lee el estado de los joysticks. 
Condiciones de entrada. 

No necesita. 
Condiciones de salida. 
El registro H contiene el estado del 
joystick 0 y el registro L el estado del 
joystick 1. 
Dado queen el buffer de teclado 
se van almacenando las teclas que 
pulsamos desde el ordenador, hay 
momentos en queen dicho buffer 
hay almacenadas varios valores, por 
Io que es muy posible que cuando 
deseemos leer una tecla en concre- 
to, se produzca la lectura de otra 
que se habia almacenado anterior- 
mente. 
Para evitar este fen6meno, existe 
en el firmware del Amstrad una ru- 
tina que se encarga de vaciar el buf- 
fer de teclado y dejarlo preparado 
para leer la pr6xima tecla que se pul- 
se desde el teclado. Dicha rutina es 
la siguiente: 
RESETEA EL BUFFER DE TECLA- 
DO. #BB03 
Reiniciar6 los buffers. 
Condiciones de entrada. 
No son necesarias. 
Condiciones de salida. 
Se corrompen los registros AF, BC, 
DE y HL. Los dem6s registros se pre- 
servan. 

Z 
odos los programadores y aficionados a la microinform6tica 
,......... 
sabemos Io tedioso y propenso a errores que resulta el teclear un 
listado de un programa. Para facilitar tu labor al m6ximo y que no 
tengas que estar horas sobre el teclado de tu ordenador tratando de 
descifrar incomprensibles mensajes de error,/I/STRAD SEMANAL 

te ofrece cada rues los programas publicados de los cuatro n0meros J 
correspondientes en una cinta de casseh'e, s61o por 756 ptas. 
[sin rods gastos par envio).  
dos los programas de nuestras cintos se encuenlran 
desprotegidos, con e/ob/eto de loci//far so copia en d;co y c, '  "[v   ' ' 
la revisi6n de los/isfados. ; 
Enviano, con ,a menor demora +,: 
correspondiente. 



iEL DEFINITIVOI 
1 niveles de dif'ltad desde cintur6n blanco 
cintur6n negro. 
A partir del octavo Dan puedes llegar a set 
"Sai Master". 
16 Movimientos diferentes. 
Joystick o Teclado. 
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THE CONNECTION 
CHINE 

Una m6quina que, partiendo de un concepto totalmente 
revolucionario en el diseo de ordenadores, deia anticuado 
el concepto cl6sico de ordenador, para entrar en una nueva 
inform6tica. 

bo de plastico 
de metro y medio de lado contiene 
en su interior el Oltimo Iogro de la t6c- 
nica en el cliseo de ordenadores. 
Tras sus paneles de color negro y 
los miles de luces rojas destelleantes 
que cubren su superficie, se encuen- 
tra THE CONNECTION MACHINE, un 
ordenador que viene a revolucionar 
"el mundo de los mainframes. 
En su reciente debut p0blico, el pri- 
mer modelo de la prodigiosa m6qui- 
na hizo una demostraci6n de sus 
asombrosas capacidades, enfrent6n- 
dose a complejos problemas que ha- 
brian mantenido ocupado durante 
horas a un ordenador normal. 
Los siguientes tiempos y operacio- 
nes, dan idea de sus prestaciones. 
En solamente 1120 de segundo, es 
capaz de revisar el contenido de 
16.000 articulos de prensa: tres me- 
ses de noticias de un peri6dico dia- 
rio. 
En dos segundos, transforma una 
imagen estereosc6pica transmitida 
por dos c6maras de televisi6n, en un 
mapa bidimensional de curvas de 
contorno. 
Tres minutos, es el tiempo que era- 
plea esta poderosa m6quina para di- 
sear el circuito de un chip de orde- 
nador conteniendo 4.000 transisto- 
res. 
En palabras de Daniel Hillis, el di- 
seffador de ordenadores de 29 afros 
de edad y cofundador de Thinking 
Machines Corp. que tiene el privele- 
gio de set el padre de tan portento- 
sa criatura: Los ordenadores con- 
vencionales son respecto a la Con- 
nection Machine, Io mismo que una 
bicicleta a un avi6n supers6nico. 
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La comparaci6n usada por Hillis 
no est@ nada lejos de la realidad; su 
extraBa m6quina es capaz de ope- 
rar a velocidades que sobrepasan el 
bill6n de instrucciones por segundo, 
aproximadamente la velocidad de 
proceso de un superordenador Cray 
X-MP, pero a la cuarta parte de pre- 
cio. 
Por otra parte, la Connection Ma- 
chine ofrece la esperanza de resol- 
ver problemas en visi6n-m6quina e 
inteligencia artificial, para los que los 
superordenadores de hoy est6n, por 
desgracia, pobremente equipados. 
SegOn Says Stephen Squires, inter- 
locutor de la Agencia de su investi- 
gaci6n de proyectos avanzados de 
la defensa (DARPA), la oficina del 
Departamento de Defensa, que ha 
suministrado 4.7 millones de d61ares 
para el desarrollo de los ordenado- 
res ha dicho: <<La m6quina de Hillis 
ha sobrepasado todas nuestras ex- 
pectativas.>> 
C6mo consigue la Connection 
Machine su impresionante veloci- 
dad'. El secreto reside en su elevado 
nOmero de procesadores, yen su ra- 
dicalmente nuevo concepto de arqui- 
tectura interna, gracias a la cual es- 
t6 dotada de la suficiente flexibilidad 
como para realizar un gran ngmero 
de operaciones simult6neamente. 
La mayoria de los ordenadores 
construidos en los amos 40, estaban 
diseados para hacer una cosa a un 
tiempo, siguiendo el modelo conce- 
bido por John von Newman y su co- 
legas en 1945. 
Este consistia en una unidad cen- 
tral de proceso de alta velocidad, co- 
nectada a una serie de c61ulas de 
memoria. 
En palabras de Hillis: 
<<La arquitectura de dos cuerpos, 
mantiene increfblemente ocupado a 
la parte de silencio dedicada al pro- 
ceso, que solamente ocupa el 3 por 
100 del total del 6rea de silicio em- 

pleada en el ordenador; el otro 97 
por 100 (dedicado exclusivamente al 
banco de memoria) permanece ocio- 
SO.t> 
De esta forma, mientras los orde- 
ndores hn crecido en capacidad, 
el diseo ha ido paulatinamente ha- 
cindose mas ineficaz. 
Mientrs es 6cil expandir la me- 
moria, la tarea de aumentar la 
pacidd de procesador es muy diff- 



cil, dando como resultado el que gi- 
ganiescas mcquinas est6n forzadas 
a conducir su flujo de datos por una 
estrecha senda, conocida en el mun- 
do de los cientificos de ordenadores 
por el <<cuello de botella de Von 
Newmanm. 
Una forma de ensanchar el cuello 
de botella es aadir m6s procesado- 
res. En los pasados cinco aos, de- 
cenas de diseadores en este campo 

han seguido este camino, incremen- 
tando su n0mero en valores que van 
desde varias unidades de proceso, 
hasta cientos de elias, dejando que 
todas compartan en paralelo el tra- 
bajo de manipular el caudal de da- 
tos. 
Connection Machine evita el pro- 
blema del cuello de botella utilizan- 
do una cantidad hasta ahora inima- 
ginable de procesadores: 65.536 
unidades, las cuales, actuando simul- 
t6neamente, pueden manejar canti- 
dades masivas de datos. 
Tan importante como el ngmero de 
procesadores es el hecho de que ca- 
da uno tiene asociado su pequeo 
banco de memoria, con Io que con- 
seguimos que el proceso y la memo- 
ria, que antes estaban separados por 
un estrecho canal, est6n ahora inte- 
grados en una pieza de silicio del ta- 
mayo de una ua. 
Llegando aOn m6s lejos en su re- 
volucionaria arquitectura, cada pro- 
cesador puede ser conectado direc- 
ta e inderectamente con cada uno de 
los demcs, mediante Io que podemos 
considerar como un aut6ntico siste- 
ma telef6nico en miniatura, constitui- 
do por 4.096 estaciones interruptoo 
ras y una red de 24.576 lineas de co- 
municaci6n, que pueden set progra- 
madas y reprogramadas sin tener 
que cambiar la constituci6n interna 
del ordenador. 
Estas conexiones reprogramables 
son las directas responsables del 
hombre de la m6quina. Para una ta- 
rea determinada, los procesadores 
son electr6nicamente seleccionados 
para adaptarse a la natural estruc- 
tura de los datos a tratar. 
Para simular la estructura de un 
componente de ordenador, integra- 
do por 20.000 transistores, la m6qui- 
na asignaria un procesador a cada 
transistor, consiguiendo queen vez 
de actualizar el estado de esos 
20.000 interruptores uno por uno, 
como en el mcs puro estilo Von New- 
mann, el software de la Connection 
Machine hate que los 20.000 proce- 
sadores seleccionados para este pro- 
ceso se actualicen todos a la vez. 
Desafortunadamente, programar 
una m6quina de estas caracteristicas 
requiere una 16gica conceptual que 
incluso muchos de los cientificos de 
ordenadores, encuentran dificulta- 
des a la hora de ponerla en pr6cti- 
ca. 
Seg0n el informe elaborado por 
DARPA, solamente uno de cada tres 
programadores del Departamento 
de Defensa pueden aceptar el reto. 

En palabras de Larry Smarr, direc- 
tor del Centro National de Aplica- 
ciones para Superordenadores, de la 
Universidad de Illionis: 
En nuestra universidad tenemos una 
experiencia de 40 aos, diseando 
software para ordenadores de un so- 
lo procesador, sin embargo, el soft- 
ware para estas mquinas es compli- 
cado y extremadamente laborioso 
de escribir. 
Afortunadamente, la Connection 
Machine tiene poderosisimos entu- 
siastas, entre los que cabe destacar 
a Marvin Minsky, perteneciente al 
MIT (Massachusetts Institut of Tecno- 
Iogy), pionero en la investigaci6n en 
inteligencia artificial, y Claude Shan- 
non, padre de la teora estadistica de 
la informaci6n. 
La semana pasada, la compaia 
de Hillis habia recibido un total de 
pedidos de siete de sus nuevos orde- 
nadores, los cuales se encuentran en 
una escala de precios que van des- 
de el mill6n de d61ares para las uni- 
dades m6s baratas, hasta los tres mi- 
Ilones. 
Los organismos que han encargao 
do las revolucionarias m6quinas, 
avalan por su reconocido prestigio el 
brillante futuro que aguarda a Thin- 
king Machine Corporation; dos orde- 
nadores han sido solicitados por ca- 
da uno de los siguientes organismos: 
M.I.T., Perkin-Elmer y DARPA, y uno 
m6s ha sido encargado por la Uni- 
versidad de Yale. 
Pero la compaia de Hillis no es la 
Onica en este campo; Intel y Floating 
Point Sistems, estn construyendo or- 
denadores de procesadores parale- 
los Ilegando a limites tan ambiciosos 
como los de Thinking Machine. 
Por otra parte, un par de compa- 
ias de reciente creaci6n Encore y 
Sequent, est6n intentando captar un 
mercado orientado hacia m6quinas 
paralelas mcs modestas. 
Mientras tanto, equipos de inves- 
tigaci6n a Io largo de todos los Esta- 
dos Unidos est6n experimentando 
con diseos aOn mcs radicales. 
Entre ellos, AT&T Bell est6 desarro- 
Ilando circuitos para ordenadores 
que imitan la acci6n de los billones 
de neuronas que componen el cere- 
bro humano. 
Y la cosa no queda ahi, hay un 
gran camino por recorrer y nos en- 
contramos en la hora de experimen- 
tar; los resultados obtenidos cambia- 
r6n pot completo los conceptos de la 
inform6tica cl6sica. 
El futuro est a la vuelta de la es- 
quina. 



CROLL PIXEL A PIXEL 
A IZQUIERDA, DERECHA, 
ARRIBA Y ABAJO 

Hasta el momento hemos tenido la oportunidad de aprender 
a realizar <<scro//s de pantalla catheter a car6cter, gracias a 
algunos articulos aparecidos en esta misma revista. Ahora le 
toca el turno al scroll pixel a pixeh 
As/pues, dicho comando efectga un scroll 
a la derecha del bloque de pantalla indicado 
-, 
por los onteriores por6metros. "" . 
j El comando encargado de efectuar el scroll ' 
a izquierda de la pantalla es el siguiente: 
IROLLI,X,Y,A,B 
Su ejecuci6n provoca un scroll a la izquier- 
da del bloque de pantalla delimitado por los 
emos creido conve- par6metros que Io acompaan, que tiene el 
niente abordar este tema, ya que considera- mismo significado que los explicados anterior- 
L 

mosque una rutina de este tipo puede ser mu- 
cho ms atractiva en la realizaci6n de presen- 
taciones e incluso en la programaci6n de jue- 
gos, porque produce una rotaci6n de la pan- 
|alia de una forma mucho m6s suave que la 
pueda producir un scroll car6cter a car6cter. 
Para la facilidad en el manejo de dicha ru- 
tina, hemos considerado oportuno crear va- 
rios comandos RSX con los cuales podremos 
acceder a coda uno de los scroles posibles, 
que son los siguientes: 
- Scroll pixel a pixel a derecha 
- Scroll pixel a pixel a izquierda 
- Scroll pixel a pixel arriba 
- Scroll pixel a pixel abajo 

mente. 
El siguiente comando es el encargado de 
efectuar el scroll hacia arriba: 
IROLLU,X,Y,A,B 
cuyos parmetros son id6nticos a los anterio- 
res. 
Por Oltimo, tenemos la instru¢ci6n que se en- 
cargar de producir un scroll abajo de la pan- 
talla: 

IROLLA,X,Y,A,B 

Pixel a pixel: fen serio! 

Comandos RSX de scroll 

Vamos ahora a estudiar cada uno de dichos 
comandos y c6mo se deben utilizar. En primer 
lugar tenemos el que se encarga de producir 
un scroll hacia la derecha: 
IROLI D,X,Y,A,B 
Los par6metros que aparecen tienen la si- 
guiente significaci6n: 
X. Coordenada vertical de la esquina supe- 
rior izquierda del bloque de pantolla sobre el 
que se va a efectuar el scroll. 
Y. Coordenada horizontal de la esquina su- 
perior derecha del bloque de pantalla sobre 
el que se va a efectuar el scroll. 
A. Altura del bloque sobre el que se efec- 
t0a el scroll. 
B. Anchura del bloque sobre el que se efec- 
tOa el scroll. 

Debemos tener en cuenta que la ejecuci6n 
de cada uno de los anteriores comandos pro- 
voca el desplazamiento de un pixel del bloque 
de pantalla indicado por los par6metros; 
pues, si deseamos efectuar el desplazamien- 
to de un car6cter completo, deberemos eje- 
cutar dichos comandos 8 veces. 
Veamos, por ejemplo, c6mo deberiamos 
confeccionar un programa en Basic que se en- 
cargar de desplazar hacia la derecha un blo- 
que de pantalla cuya coordenada vertical fue- 
ra la 15, con una coordenada horizontal de 
5, y cuya altura y anchura fueran 10 y 20 res- 
pectivamente. Para producir el efecto que de- 
seamos deberiamos escribir el siguiente co- 
mando: 
IROLLD,15,5,10,20 
su ejecuci6n produciria el desplazamiento de 
un pixel hacia la derecha de la pantalla. Ahora 
bien, si Io que se desea en rea[idad es produ- 
cir un desplazamiento de tres caracteres por 

ejemplo, entonces se deberia escribir un pro 
grama como el siguiente: 
10 FOR N=I TO 24 
20 IROLLD,15,5,10,20 
30 NEXT 
Para aqu611os que no les haya quedado cla- 
ro el funcionamiento de dichos comandos, 
pueden revisar el programa demostraci6n que 
acompaa a este articulo. 
Dicho programa efectOa un scroll en todos 
los sentidos de una pantalla de presentaci6n 
que hemos preparado a tal efecto. 
La rutina en c6digo m6quina, instala en pri- 
mer lugor los comandos mencionados ante- 
riormente en el sistema, para que 6stos sean 
utilizables desde Basic, de la forma habitual: 
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se prepara la labia de saltos junto con el norn- 
bre de los nuevos comandos. 

Funcionamiento 
de las rutinas de scroll 

Vamos a estudiar ahora c6mo funcionan ca- 
da una de las rutinas de scroll. 
Un desplazamiento pixel a pixel se produ- 
ce debido a la rotaci6n de los bits que com- 
ponen un byte, coloc6ndose el bit 0 de un byte, 
en el bit 7 del siguiente, o bien en el bit 7 de 
dicho byte se coloca en el bit 0 del anterior, 
segOn sea el scroll a izquierda o derecha. 

Lo explicado anteriormente servirfa por 
ejemplo para producir un scroll en el rnodo 2 
de Am,:trad, pero como hemos dicho ante- 
riormente, nosolros deseamos lrabajar en mo- 
do 1. 
Pues bien, como todos sabemos, el trata- 
miento del color que Ileva el Amstrad, im- 
plica el emparejarniento de bits dentro de un 
rnismo byte. As/, en rnodo 1, el ernnparejarnien- 
to de bits es el siguiente: 
0-4 1-5 2-6 3-7 
por Io tanto, la rotaci6n se debe producir de 
la forma que hemos explicado anteriormen- 
re, pero teniendo adern6s en cuenta que cuan- 
do se trasvase el bit 7 de un byte a otro, de- 
beremos adem6s lrasvasar el bit con el que se 
encuenlra ernparejado (en este caso ser6 el bit 
3). 
Del misrno rnodo, cuando se trasvase el bit 
O, se deber pasar con 61, el bit 4. De esla for- 
ma se podr conseguir un scroll correcto de 
la pantalla. 
En Io referente a los scrolls arriba o aba- 
jo, el trabajo resulta rnucho m6s sencillo, ya 
queen este caso Io que debemos desplazar 
son bytes, con Io cual nos ahorrarnos el tra- 
bajo de rotaci6n de bits. 
Dado que estas dos Oltimas operaciones no 
trabajan con bits, su funcionarniento ser6 v6- 
lido en cualquiera de los rnodos de pantalla 
con que puede trabajar el Amstrad. 

Arriba y abajo 

El mtodo es muy sencillo, ya que Io gnico 
que se hace es provocar un LDIR de unas di- 
recciones a otras de pantalla, con Io cual se 
Iogra producir el efecto de desplazamiento pi- 
xel a pixel. 
$61o queda por explicar los rnensajes de 
error que se nos pueden rnostrar en la utiliza- 
ci6n de los nuevos comandos; 6stos son los si- 
guientes: 
FALTAN PARAMETROS: este rnensaje nos 
indica que hernos ornitido alguno de los pa- 
r6metros necesarios para dicho comando. 
FUERA DE RANGO: indica que los par6me- 
tros establecidos provocan un scroll fuera de 
los limites de la pantalla. 
ERROR EN PARAMETROS: indica que algu- 
nos de los par6metros vale cero. (Ninguno de 
ellos puede ser cero). 
Vearnos por Oltimo curies son los pasos que 
debemos realizar para el correcto funciona- 
rniento de los comandos RSX rnencionados an- 
teriorrnente. 
En primer lugar deberemos copiar el lista- 
do ensamblador que aparece junto a este ar- 
ticulo, para Io cual deberemos estar en dispo- 
sici6n de alggn ensarnblador. 
Para aqu611os que no posean dicha herra- 
mienta de programaci6n, y deseen pasar a 
cinta o disco dichos comandos RSX, aparece 
tarnbi6n un cargador Basic. 

C6mo manipular 
el cargador 

Los que elijan esta segunda opci6n, debe- 
rn ledear dicho cargador y ejecutarlo; si una 
vez hecho esto no aparece ninggn rnensaje de 
error, se proceder6 a su grabaci6n de la for- 
rna siguiente: 
SAVE"SCROLL",B,&AO00,700 
Una vez tengamos salvado dicho programa 
en disco o cinta, y deseemos ejecularlo, de- 
beremos escribir un programa cargador en 
Basic con el siguiente: 
10 MEMORY &9FFF 
20 LOAD"SCROLL",&AO00 
30 CALL &AO00 
Cuando dicho prograrna se haya ejecuta- 
do, estaremos en disposici6n de utilizar los 
nuevos comandos RSX. 

LISTADO DESENSAMBLADO 
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PRO RAM' ARG'D" 

IB FOR h-BB8 TO &AE 
28 READ A:SSUHA+A 
3B POKE N,A 
48 NEXT 
5B IF SL<)75656 THEN PRINT 'ERROR 
EN 0ATAS" 
68 DATA 1,9,168,33,44,168,195 
78 DATA 289,188,23,]68,195,48,]68 
88 DATA ]95,138,168,195,248,168,195 
98 CATA 127,16],82,79,76,76,196 
188 DATA 82,79,76,76,281,82,79 
I18 [TA 76,76,213,82,79,76,76 
128 DATA 193,8,8,8,8,8,254 
138 [TA 4,]94,183,162,285,36,162 
148 DTA 216,22],126,8,58,25,162 
158 TA 22],126,2,58,24,162,22] 
168 [CTA 118,4,221,182,6,285,232 
178 DATA 168,58,24,162,71,197,229 
188 DATA 14,8,229,175,58,13],168 
198 DATA 58,25,16271,285,]19,168 
288 DATA 35,]6,258,225,17,8,8 
218 [TA 25,13,121,32,232,225,17 
228 DATA 88,8,25,19316,228,281 
238 DATA 126,238,]7,23,23,23,87 
248 CTA 126,238,238,3],246,8,]19 
258 [tTA 122,58,131,]68,28],254,4 
268 [.TA ]94,183,162,285,36,162,216 
278 DATA 221,126,8,111,58,27,]62 
288 [:TA 221,126,2,58,26,162,22] 
298 CTA 126,4,133,61,111,22],182 
388 DATA 6,285,232,168,58,26,162 
318 DATA 71,197,229,14,8,229,175 
328 DATA 58,225,168,58,27,162,71 
338 DATA 285,213,168,43,16,258,225 
348 DATA 17,8,8,25,13,]2],32 
358 DATA 232,225,17,88,8,25,193 
368 DATA 16,228,281,126,238,]36,3 
378 TA 31,31,87,126,238,119,23 
388 DATA 246,8,119,122,58,225,168 
398 TA 281,23533,176,191,66,22 
488 CTA 8,29,2517,88,8,25 
418 DATA 16,253,281,254,4,194,183 
42e DATA 162,285,36,}62,21&,221,126 
438 [TA 8,58,28,162,6,8,79 
448 DATA 237,67,38,162,221,126,2 
458 DATA 58,29,162,221,118,4,221 
468 DATA 182,6,285,232,168,229,]7 
478 DATA 8,8,25,289,58,29,162 
488 DATA 7]]97,229,213,229,6,7 
498 DATA 197,229,213,237,75,38,162 
588 DATA 237,176,225,17,8,8,25 
518 DATA 235,225,213,]7,8,8,25 
528 DATA 289,193,16,231,225,213,17 
538 DATA 176,7,55,63,237,82,289 
548 DATA 237,75,38,162,237,]76,225 
558 DATA 17,88,8,25,235,225,213 
568 DATA 17,88,8,25,289,]93,16 
578 DATA 193,235,17,88,8,55,63 
588 DATA 237,82,17,8,56,25,229 
598 DATA 289,19,237,75,38]62,11 
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688 DATA 54,8,237,176,28],254,4 
618 DATA 194,183,162,285,36,162,216 
628 C4TA 221,126,8,58,34,162,6 
638 DATA 8,79,237,67,32,162,221 
648 DATA ]26,2,183,58,35,162,221 
658 DATA I]8,4,22],126,6,132,61 
668 DATA 183,285,232,]68,17,8,56 
678 DATA 25,229,17,8,8,55,63 
688 DATA 237,82,289,58,35,162,71 
698 DATA 197,229,213,229,6,7,197 
788 DATA 229,213,237,75,32,162,237 
718 DATA 176,225,17,8,8,55,63 
728 DATA 237,82,235,225,213,17,8 
738 DATA 8,55,63,237,82,289,193 
748 DATA 16,225,225,213,17,176,7 
758 DATA 55,63,25,289,237,75,32 
768 CTA 162,237,176225,17,88,8 
778 DATA 237,82,235,225,213,17,88 
788 DATA 8,237,82,289,193,16,186 
798 DATA 235,17,88,8,55,63,25 
888 DATA 17,8,56,237,82,229,289 
818 DATA 19,237,75,32,162,11,54 
828 DATA 8,237,]76,281,8,8,8 
838 DATA 8,8,8,8,8,8,8 
848 DATA 8,8,221,126,8,167,48 
858 DATA 53,22],126,2,167,48,47 
868 DATA 221,126,4,167,48,41,221 
878 DATA 126,6,167,48,35,221,126 
888 DATA 8,87,221,126,4,I38,254 
898 DATA 88,48,15,221,126,2,87 
988 DATA 221,126,6,138,254,25,48 
918 DATA 3,55,63,281,33,139,162 
928 DATA 285,111,162,55,281,33,]54 
938 DATA 162,285,111,162,55,281,33 
948 DATA 121,162,285,]11,162,55,281 
958 DATA 126,254,255,288,285,98,187 
968 DATA 3524,246,78,65,76,84 
978 DATA 65,78,32,88,65,82,65 
988 DATA 77,69,84,82,79,83,255 
998 DATA 78,85,69,82,65,32,68 
1888 DATA 69,32,82,65,78,71,79 
1818 DATA 255,69,82,82,79,82,32 
1828 DATA 69,78,32,88,65,82,65 
1838 DATA 77,69,84,82,79,83,255 
1848 DATA 8 

' ROGRAMA EJEMP. 

18 MODE I:BORDER 8:INK 8,8:PAPER 
INK 1,24:PEN 
28 LDAD'SCROLL',888 
38 CALL 
48 LOCATE 15,18:PRINT'MICROHOBBY' 
58 LOCATE 16,]2:PRINT'AHSTPqD' 
68 GOSUB 388 
78 INK 1,24 
88 GOSUB 288 
98 GOSU8 258 
188 GOSUB 288 
118 GOSUB 388 
128 INK 1,6 
138 GOSUB 288 
148 G0SUB 258 
158 GOSUB 288 
168 GOSUB 388 
178 INK 1,6 
188 WHILE INKEY$='':WEND 
198 END 
288 FOR N=I TO 98 
218 ROLLD,I8,],I,72 
228 IROLLI,12,1,1,72 
238 NEXT 
248 RETURN 
258 FOR N=I TO 16 
268 IROLLA,I8,58,3,28 
278 IROLLU,18,5,3,28 
288 NEXT 
298 RE-TURN 
388 FOR N=8 TO 26:INK I,N:FOR X-I T 
0 28:NEXT X:NED(T N 
318 RETURN 

Sinduda 
alguna 

A troves de esta secci6n se pre- 
tende resolver, en la medida de Io 
posible, todas las posibles dudas 
que ((atormentem a todas los 
personas interesadas en el mundo 
del AMSTRAD, sean o no poseedo- 
res de uno y, si Io son, se encuen- 
tren en cualquier nivel de destreza 
en su manejo. 
Semanalmente, aparecen en estas 
p6ginas los consultas de la mayor 
cantidad de usuarios posible; ella re- 
dundar6 en un meier servicio yen 
un contacto m6s estrecho entre to- 
dos nosotros a trav6s de la revista. 
SIN DUDA ALGUNA est6 
abierta a redes. 

AMSTRAD BII INGOE 
Estoy a punto de comprarme un 
Amstrad pero tango la duda de cu61 
de las versiones del Amstrad CPC 
6 128 comprar, la inglesa o la espa- 
fiola. Y as formula estas dos pregun- 
tas: 
--Las ampliaciones de memoria, 
Ipiz 6price, modem, tabletas grdfi- 
cas, lector de tarjetas EPROM y pe- 
rif#ricos en general, de procedencia 
todos amos de Gran Bretaa, #son 
compatibles con las versiones espa- 
olas de los ordenadores Amstrad? 
--En la versi6n inglesa, #es posible 
generar los siguientes caracteres del 
castellano y cataldn (ICl,,c,#,j,). 
Jos Fco. Garda (arcelona) 
Sabre tu pregunta te podemos decir que, las 
diferencias que hay entre el 6128 espafiol e 
ingles son Onicamente de teclado, los perif6- 
rices, modem, etc., son perfectamente com- 
patibles, Io que ocurre es qua al ser el tecia- 
do diferente es posible que pare hacer funcio- 
nor correctamente un programa con el 6128 
espafiol haya que definir determinados teclas, 
cosa sta totalmente posible. 

Osea, que Io elecci6n es tuya, aunque ten 
en cuento queen Espofio, te6ricamente, ya no 
se deberio vender la versi6n inglesa. 

ACERCA DEL 472 
Soy un poseedor de un 472 y me 
gustaHa saber varias cuestiones: 
1) #Qug significa (#el comandoa.) 
 (micro AM$RAD n. o 31, el rat6n 
casero, Ifnea 3140)? 
2) #Qug tecla debo utilizar en un 
4,72, o par qu# la puedo sustituir? 
3) #Cugntas ¢¢K se come un 
floppy disk y una impresora (par 
eiemplo, una Printer 130), y qu# ti- 
po de ampliaci6n de memoria debo 
ufilizar? 
Constantine Roda 

El simbolo ol quete refieres no es sine el de 
exponenciaci6n y est6 en el teclado pero ask 
d>. Lo que ocurre es qua en los listados sole 
diferente porque la impresoro carece de ese 
simbolo. 
El manejo de una unidad de disco implica 
la necesidad de ufilizar un pace mes de 1K 
(1.284 bytes) de memoria. En Io concernien- 
te a la ampliaci6n de memoria, lamentamos 
comunicarte que el 472 no puede utilizarlas. 

CUANTA MEMORIA  . 
.--Me gustaria saber si existen 
ampliaciones de memoria RAM pa- 
ra el CPC--64, y si as es, de cudn- 
tos Kb y el precio de la misma. Idem 
para la memoria ROM. 
2.--2Se pueden acoplar otras uni- 
dades de disco al CPC--464 ademds 
de la de 37 
Par ltimo, darles la enhorabuena 
par la gran calidad de los programas 
publicados ltimamente en la revis- 
tay rogarles que sigan publicando 
ms programas de utilidad, coma 
par ejemplo un programa de Hoja 
de Clculo sencillo. 
Agradeci#ndoles de antemano la 
atenci6n qua presten a mis dudas. 
Angel Nifio Gonz61ez (Le6n) 

Par supuesto qua existen ampliaciones de 
memoria RAM para el CPC-464, Io que ya 
no tenemos tan dora, aunque creemos que si, 
es que haya ompliaciones de memoria ROM. 
La ampliaci6n de memoria RAM es de 64K, en 
cuanto al precio, no te podemos decir una ci- 
Fro concreta, pero est6 alrededor de 15.000 
ptos. 
Referente a tu segunda pregunta, la respues- 
ta es si, pudiendo ser de 3 1/2" y de 5 1/" los 
posibles unidodes a acoplar. 
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T,$WORD 128 

Podemos escribir a Ipiz, o bol/grafo, e incluso a 
mquina, pero Io formo ms eflciente y fcil de 
realizar un e$crito perfecto, es utilizor el 
ordenodor. 

racias a los programas 
dedicados a la escritura, podemos hacer co- 
sas tan asombrosas que cualquier otro mto- 
do queda totalmente eclipsado por las venta- 
jas del ordenador. 
Los mayores problemas de la escritura tra- 
ditional tienen su origen en que Io que est6 
escrito ya no se puede rectificar, que forma 
que es imposible hater ning0n cambio si no 
nos gustan los resultados. 
La mayor rectificaci6n que se puede reafi- 
zar en una mquina de escribir electr6nica es 
borrar una o varias letras, Io cual permite en- 
mendar alg0n error, pero no modificar sensi- 
blemente el texto. 
Con la Ilegada de la escritura informatiza- 
da, todo ha cambiado radicalmente. Gracias 
a los procesadores de texto, nuestro ordena- 
dor trabaja con las palabras como si de pie- 
zas independientes se tratara, ofreciendo una 
serie de posibilidades de alterar su disposici6n 
y estructura que parecen increibles. 
Esta facilidad de mover el texto por panta- 
Ila, de alterar las lineas, p6rrafos y p6ginas 
como nos venga en gana, es la responsable 
de la absoluta supremacia del procesador de 
textos, sobre cualquier otro medio de escritu- 
ra. 
Hasta los grandes fabricantes de m6quinas 
de escribir reconocen las ventajas de la escri- 
tura electr6nica, y dotan a sus modelos m6s 
evolucionados de pantalla, memoria y discos 
de almacenamiento. 

iQu podemos hater con 
un procesador? 

Supongamos que tenemos que realizar un 
escrito, donde sabemos de qu vamos a ha- 
blar, pero no las palabras exactas. 
Una vez superado el trauma del papel en 
blanco, las frases afluyen a nuestra mente con 
una velocidad que es dificil atrapar en el te- 
clado. 
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Nuestros dedos saltan de tecla en tecla, con 
un ritmo desenfrenado que ni nosotros mismos 
sabemos cundo va a acabar. 
Cuando queremos darnos cuenta, tenemos 
en la pantalla varias lineas de texto, contenien- 
do los primeros acordes de nuestra incipiente 
obra literaria. 
Tras el p6rrafo de introducci6n, nuevas 
neas van imprimindose en la pantalla, nues- 
tro cerebro no deja de trabaiar y las ideas se 
agolpan antes de ser traducidas a letras. 
Poco a poco, nuestros dedos intentan des- 
congestionar el caudal cerebral que nos des- 
borda. Tras unos minutos de tecleo, la panta- 
Ila tiene un aspecto totalmente distin|o, en 
nuestro frenesi creador hemos escrito casi dos 
pantallas de texto. 
En elias est6n contenidas las ideas, y los prin- 
cipales punos sobre los que versar nuestro 
escrito. 
Despus de una reposada lectura, nos da- 
mos cuenta de que algunos puntos bien me- 
recen un desarrollo m6s extenso, incluso ahora 
hemos recordado una idea que no puede ser 
ignorada. 
Si estuvisemos escribiendo en papel, el pr6- 
ximo paso seria coger otro par de folios y co- 
menzar a escribir bas6ndonos en las dos pri- 
meras hojas, ya inservibles. 
Gracias al procesador, para aadir esa nue- 
va idea, en el sitio deseado, s61o tenemos que 
abrir espacio entre las lineas primitivas y co- 
menzar a escribir. 
Para desarrollar los puntos en los que nos 
habiamos quedado cortos, el mismo proceso 
nos permite darles la Iongitud necesaria. 
Una vez que tenemos desarrolladas todas 
las ideas, y que les hemos dado la Iongitud de- 
seada, es la hora de volver a leer. La nueva 
lectura, nos revela que precisamente el orden 
en el que hemos expuesto nuestro parecer no 
es el adecuado. 
Nuevamente el procesdor nos resuelve la 
papeleta cambiando al lugar id6neo las por- 
ciones de texto que haga falta. 
Efectuados los cambios, leemos cuidadosa- 
mente para detectar esas comas que siempre 
se olvidan, esas palabras de ortografia err6- 
nea, y dem6s despistes que la precipitaci6n y 
el ecleo hayan dejado en el escrito. 

Borramos Io que haga falta, cambiamos las 
palabras necesarias, introducimos los puntos 
y comas requeridos, y corregimos la ortogra- 
fla. 
Una nueva lectura nos confirmar6 que nues- 
fro texto est6 listo para imprimir, un toque de 
tecla nos dar6 un escrito ordenado en la ex- 
posici6n de las ideas, con una pulcra ejecu- 
ci6n, perfecta ortografia y ni una sola enmien- 
da o tachadura. 



Cuntas veces tendriamos que hoberlo re- 
petido a m6quina? 

Tasword en castellano 

FI principal problema del software, es que 
como se produce en Inglaterro, 16gicamente 
est6 hecho en ingles, produciendo graves pro- 

blemas para la gente que no conoce este idio- 
mo. 
Para evitar estos problemas y con el objeto 
de vender ms copias, las casas que distribu- 
yen el producto en Espaa, traducen los ma- 
nuales, consiguiendo de esta forma una solu- 
ci6n intermedia; manuales en castellano e ins- 
trucciones en pantalla en ingles. 
Asombrosamente, en la versi6n de tasword 
para Espaa, Ilegamos a la soluci6n total; es- 
tamos en posesi6n de un extenso manual de 
instrucciones en espaol, y to que es ms im- 
portante, de un programa en el que todos los 
mensajes, men0s y dem6s instrucciones en pan- 
talla est6n en castellano. 
Otro gran problema de los procesadores de 
texto es el molesto caso de la fi; la ortografia 
hispana posee esta artistica letra 0nica en el 
mundo, la cual por supuesto no est incluida 
en los c6digos ASCII. 
En Tasword el problema est6 resuelto; te- 
nemos a nuestra disposici6n los signos de la 
fi; la interrogaci6n al principio de frase y las 
vocales acentuadas; con estas mejoras el pro- 
grama queda totalmente adaptado a nuestra 
lengua. 
$61o hemos de resear un pequeo fallo en- 
tre tanta maravilla, con la indusi6n de la  y 
demos signos tipicos del castellano: ha desa- 
parecido del tedado el signo de los dos pun- 
tos (en la versi6n inglesa del 6128, no en la 
castellana), nadie es perfecto. 

Instrucciones y manual 

El Irograma viene contenido en un estuche 
de grandes dimensiones. Cuando extraemos 
la carpeta nos encontramos con un extenso 
manual de 71 pginas, en el cual se encuen- 
tran ampliamente explicadas todas los funcio- 
nes y posibilidades del mismo. 
Los entusiastas de la lectura pasar6n gra- 
tas horas de prctica, siguiendo el manual y 
consiguiendo en pocas sesiones un dominio to- 
tal del mismo. 
Los que no estan tan inclinados a la lectu- 
ra, tienen una posibilidad que les permitir6 ma- 
nejar el mismo sin usar apenas el manual. 
En el disco del programa, vienen incluidos 
un tutor y varios textos explicativos. Estos se 
cargan como si fuese un texto cualquiera, y 
su lectura y la realizaci6n de los pequeos 
ejemplos que nos proponen, nos permite ha- 
cernos con el completo dominio del progra- 
ma, sin tener que leer el manual. 
Sin m6s pre6mbulos, extraemos el disco de 
la funda y Io insertamos en el ordenador; 
RUN TASWORD hace que ste se cargue 
en memoria en varios segundos. 
Concluida la cargo aparece ante nuestros 
ojos la pggina, a cuyo pie se encuentran los 
datos de linea, columna, justificaci6n derecha, 
palabra partida, fin de p6gina, tecla de ayu- 
day juego de caracteres, encima de los cua- 

les tenemos la reglilla de m6rgenes y tabula- 
dores. 

Personalizaci6n del programa 

La primera operaci6n que conviene realizar 
es personalizar el programa; con ella modifi- 
caremos los colores de la pantalla y definire- 
mos los m6rgenes adecuados al formato de 
nuestro texto. 
El cambio de color de la pantalla es un he- 
cho que agradeceran los poseedores de mo- 
nitores en color; los colores iniciales son pa- 
pel negro con letras blancas, los cuales pro- 
ducen un gran contraste para la vista, al ser 
opuestos a los textos escritos sobre papel. 
Los m6rgenes los definiremos de manera 
que las lineas de texto tengan el nOmero de 
caracteres deseado; inicialmente el nOmero de 
caracteres fijado por linea es de 80, pudien- 
do establecerse ste entre 1 y 128 (la panta- 
Ila admite un maximo de 80, por Io cual so- 
brepasar este nOmero nos obligar6 a realizar 
molestos scrolls). 
El menO principal, en su opci6n de perso- 
nalizar el programa nos permite realizar este 
cambio ton necesario: en 1 podemos elegir 
color del papel, borde 1, borde 2, tin'a 2, tinta 
1, tinta 2, forma del cursor, morgen derecho 
y margen izquierdo. 
En la elecci6n de colores, para evitar el con- 
troste (fuertemente perjudidal para la visla) 
que existe entre pasar la vista continuamente 
desde un papel blanco con impresi6n negro, 
a una pantalla negra con letra blanca, se pue- 
de usar el color 13 (blanco) para el papel y 
0 (negro) para la tinta 1, la tinta 2 puede ser 
el 3 (roja), pues s61o aparece en el men0 prin- 
cipal indicando el n0mero de lineas, palabras, 
caracteres y dem6s datos estadisticos del tex- 
1o escrito. 
Una vez realizados los cambios necesarios 
en el programa procedemos a su grabaci6n, 
para poder cargarlo en memoria sin efectuar 
m6s modificaciones cada vez que vayamos a 
usarlo. 
El men0 principal posee una opci6n de gra- 
baci6n que resulta id6nea para este fin. Con 
ella adem6s podremos obtener copias de se- 
guridad del programa, con las cuales pode- 
mos prevenir cualquier accidente que se pro- 
duzca en el master. 
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Funciones de pie de pgina 

La pantalla initial est6 presidida por la ca- 
becera de ayuda, la cual ocupa casi un tercio 
de pantalla; puede eliminarse teniendo de esta 
forma la pantalla completa para texto. 
En la parte inferior de la pantalla, bajo la 
reglilla de tabulaci6n y ancho de lineas, se en- 
cuentran las opciones b6sicas, y el indicador 
de si cada uno de elias se encuentra activada 
0 no. 
A la izquierda se nos marca el nOmero de 
linea en la que nos encontramos; tras ella, el 
ngmero de columnas; despus las cuatro fun- 
clones de justificaci6n, ruptura de palabras, 
modo de inserci6n y final de p6gina. 
Ahora procedemos a fijar las opciones que 
m6s se adaptan a nuestro estilo de texto y for- 
ma de escribir. 
En primer lugar fijamos la opci6n de ruptu- 
ra de palabras; con ella actlvada el progra- 
ma comprueba sila gltirna palabra de la linea 
cabe integra en ella, en caso contrario la pa- 
sa a la de abajo sin que sta quede partida. 
Con la ruptura desactivada, la Oltima pala- 
bra de la linea quedaria partida en dos, en 
caso de que no entrase integra en la linea. 
La siguiente opci6n es la de justificaci6n; sta 
nos permite ordenar los espacios entre las pa- 
labras que componen una linea, de forma que 
en la primera y glfima columnas de la misma 
siempre se encuentre alguna letra. 
La utilizaci6n de la justificaci6n da a nues- 
tros textos un aspecto francamente uniforme 
y agradable a la vista. La distribuci6n de las 
palabras en la linea ocupando toda sta se- 
paradas a espacios iguales, evita esos espa- 
cios en blanco a la derecha de la misma, que 
por decirlo de alguna forma descompensan un 
poco el ritmo de las letras. 
Esta opci6n est6 intimamente ligada a la de 
ruptura de palabras, pues sirve de comple- 
mento indispensable cuando no queremos que 
aparezcan palabras partidas. 
La siguiente funci6n, es una de las m6s Oti- 
les e importantes en un procesador de textos: 
estamos hablando de la inserci6n. 
Debido a que nadie es perfecto y que el ser 
humano se equivoca con frecuencia, es fun- 
damental que entre ciertas palabras podamos 
intercalar aquello que se nos haya olvidado. 
Supongamos que tras una palabra quere- 
mos poner una coma, que otra queramos de- 
jarla en plural en vez de en singular, que nos 
falta una palabra entre otras dos, etc. 
Todo esto se resuelve de forma inmediata 
con la inserci6n, con ella podemos partir una 
linea por el punto deseado y a partir de ste 
escribir, volviendo a ensamblar la linea des- 
pus con la justificaci6n. 
Nuestro procesador permite dos modos dis- 
tintos de justificaci6n: la normal que median- 
te un toque de ENTER crea una linea en Nan- 
co en la posici6n del cursor, y la autom6tica. 

22 ;'coo AMSTRAD 

JustificatiOn automtico 

Sin duda, la operaci6n m6s importante de 
esta versi6n de Tasword es la justificaci6n auto- 
m6tica. Con ella podemos intercalar las pa- 
labras que deseemos en el texto con s61o co- 
Iocar el cursor en posici6n y empezar a escri- 
bir. 
Su uso ofrece la ventaja de que ordena el 
texto que viene a continuaci6n, moviendo ha- 
cia abajo las palabras que sobran de la linea, 
es decir, que adem6s iustifica autom6ticamente 
el texto restante. 
La comodidad que ofrece este modo de in- 
serci6n y la facilidad con que 6sta operaci6n 
se realiza, hacen que esta versi6n de Tasword, 
deje a las anteriores baslente anticuadas. 
La Ollima opci6n es la del indicador de fin 
de pgina. Una vez definidas las lineas que 
constituyen cada p6gina, esta opci6n activa- 
da hate aparecer una linea de puntos al final 
de cada una, con Io cual obtenemos una im- 
portante guia visual de la estructura de nues- 
tro escrito. 
Fijadas las funciones b6sicas, s61o nos que- 
da empezar a escribir, en pantalla iron apa- 
reciendo los letras que tecleamos, orden6ndo- 
seen las lineas segOn las funciones que ten- 
gamos activadas. 

Movimiento del cursor 

Con una cantidad de texto suficientemente 
grande, podemos observar los ventajas, los 
distintos tipos de movimiento del cursor a Io 
largo de las lineas y palabras. 
Este puede saltar de letra a letra, de pala- 
bra a palabra, de linea a linea, de una pan- 
talla a la siguiente, al principio y al final del 
texto. 

A 

TflATAMILI 

Los errores cometidos en nuestra operaci6n 
de tecleo, son f6ciles de subsanar con la tecla 
de borrado: podemos borrar una letra, una 
palabra, una linea, e incluso si el error es de 
demasiada cuantia, podemos borrar todo el 
texto. 
Si no tenemos activado el modo autom6ti- 
co de inserci6n, podemos insertar una letra, 
una linea, o varias donde nos interese. 
Otras posibilidades en la escritura de lineas, 
son la de mover eJ texto a la derecha, a la iz- 
quierda, centrar una linea, justificar un p6rrafo 
entero, o solamente una linea. 
Podemos adaptar el formato de los lineas 
a nuestras necesidades alternando los m6rge- 
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nes, Io cuales se pueden suprimir, colocar al 
lado derecho, o situar al izquierdo. 
De forma similar podemos alterar las mar- 
cos de tabulaci6n, de manera que el movi- 
miento r6pido a Io largo de los lineas se reali- 
ze con soltura. Podemos borrar todos los exis- 
tentes, restituir los primitivos, aadir los que 
deseemos o borrar los que has sobren. 

P6gina de ayuda 

Un capitulo importante, es ta p6gina de ayu- 
da; en ella se encuentran concentradas todas 
los funciones y las teclas que las activan. Pa- 
ra sacar esta p6gina par pantalla, basta con 
pulsar una tecla (ESC); despues, un toque de 
ENTER nos devuelve a la misma posici6n del 
texto en la que has encontrabamos. 
Otra innovaci6n respecto a anteriores ver- 
siones, introducida para el usa en Espaa del 
programa, es la inclusi6n de la  en el proce- 
sador y las vocales acentuadas. 
Para la repetici6n de algunas de esas pala- 
bras que siempre aparecen en cualquier es- 
crito, o de las cabeceras de notas, cartas, etc, 
podemos programar las teclas de funci6n pa- 
ra que contengan las palabras deseadas; des- 
pues, a toque de teda aparecer6 en la posi- 
ci6n del cursor el texto programado. 
El movimiento de bloques de texto, es otra 
de los grandes ventajas que pone en manos 
del usuario un procesador de textos. Con es- 
te podemos desplazar a la posici6n requeri- 
do, la porci6n de texto que hallamos seleccio- 
nado, coma si de cortar y pegar se tratara. 
Podemos copiar el bloque, trasladarlo de un 
lugar a otro y borrar un trozo determinado. 

Bsqueda de palabras 

Para los escritores n6veles que, sin darse 
cuenta, repiten a Io largo de un texto cientos 
de veces la misma palabra, Tasword ofrece 
una soluci6n que sacar6 de apuros a m6s de 
uno, hacienda que su estilo literario mejore de 
una forma ostensible. 
Con la bOsqueda de palabras podemos Io- 
calizar a Io largo del texto todas las veces que 
hemos utilizado determinada palabra, y sus- 
tituirla seg0n convenga o no par ser la elegi- 
da a este fin. 
Para el manejo del disco, el menO principal 
has ofrece la posibilidad de cargar, grabar o 
mezclar cualquier tipo de textos que tengamos 
en el disco. 
Cada vez que Ilegamos al men0, Tasword 
has data informaci6n rags relevante del texto 
que estamos procesando: en ella nos especi- 
fica el n0mero de lineas, el de palabras, el nO- 
mero de caracteres y la cantidod de memoria 
disponible. 
Para pasar al papel el contenido de la pan- 
talla, este programa ofrece gran variedad de 
posibilidades. 
Papel continua, hoias sueltas, done espa- 
cio, triple nOmero de lineas par p6gina, pie 
de pclgina, cabecera, imprimir n0mero de p6- 
gina, etc. consiguiendo que nuestro traBajo 
sea totalmente perfecto. 

El resultado final 

Tasman software, en su 01tima versi6n de 
tasword, ha conseguido un producto franca- 
mente notable, en el que adem6s de aprove- 
char el total de la memoria de1128, ha meio- 
rado ampliamente sus anteriores procesado- 
res. 
La inclusi6n de la inserci6n autometica, que 
en los anteriores programas se echaba enfal- 
ta, data de una inusitada potencia ol progra- 
ma. 
La adaptaci6n a la ortografia del castella- 
no con eles vocales acentuadas, son un dee- 
talle que nunca dejaremos de agradecer. 
La posibilidad de recuperar la 01tima Ifnea 
borrada, constituye otra innovaci6n respecto 
alas anteriores versiones. 

El programa es de un maneio sencillo y re- 
oil de aprender, no obstante, para sacarle el 
m6ximo partido, dominando la cantidad de 
posibilidades que ofrece, habremos de dedi- 
carle varias sesiones, adem6s de realizar una 
delicada lectura del manual. 

Los versiones 
del Tasword 

Tasword ha ida evolucionando en el tiem- 
po de la misma farina que los modelos de 
Amstrad. 
Desde la aparici6n de1464, hasta la Ilega- 
da del 6128, el aumento de memoria y la in- 
.clusi6n del disco en el conjunto del ordenador, 
"han hecho que el programa haya sufrido un 
proceso paraleto de perfeccionamiento y 
aumento de sus posibilidades, dando coma re- 
sultado una versi6n que se adapta perfecta- 
mente a los caracteristicas del 6128. 
La creadora del tasword es la casa britani- 
ca Tasman Software, la cual est6 especializa- 
da en hacer oftware para Amstrad. La ver- 
si6n que tenemos ante nosotros, es el resuita- 
do de un proceso de evoluci6n y transforma- 
ci6n del programa origianal, nacido en 1983. 
La primera versi6n de Tasword estaba rea- 
lizada para el 464, con una capacidad de tex- 
to equivalente a 15.800 caracteres, quedan- 
do el testa de la memoria ocupada par el pro- 
grama, con ella no podian manejar rues de 
200 lineas de texto. 
La segunda versi6n, realizada en 1984 pen- 
sando exclusivamente en la utilizaci6n de dis- 
co, en esta se produce un aumento de la ca- 
pacidad a 21.800 caracteres, sacando el me- 
n0 principal de la memoria y cogindolo del 
disco, con Io cual podfamos tener hasta 350 
lineas de texto en memoria... 
La versi6n final; Tasword 128 est6 realiza- 
da para aprovechar las superiores prestacio- 
nes de16128, consiguiendo una capacidad de 
36.8000 caracteres, e introduciendo nuevas 
opciones que le hacen infinitamente superior 
a los anteriores. 
El usa del segundo banco de memoria es el 
principal responsabte de la superior potencia 
y capacidad de este programa; con ella se ha 
consegido un importante aumento de la can- 
tidad de texto que se puede tener en memo- 
ria, pudiendo Ilegar hasta los 500 Ifneas. 
Un proceso evolutivo que ha ida mejoran- 
do el programa de una farina continua y cons- 
tante. 
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C! Duque de Sesto, 50. 28009 Madrid (Metro O'Donnell o Goya) 
Tel.: (91) 274 53 80 Aparcamiento gratuito en Felipe II 

Ofertas en software: 2 programas al precio de 1 y adem6s regalo fin de curso una calculadora completamente gratis, iiAsombroso!! L 
Verdad? 
I 

BAT MA N 2.300 
ROCK'N LUCHA 2.300 
YIER AR KUNG FU 2.300 
THE WAY OF THE TIGER 2.300 
WEST BANK 2.100 
CAMELOT WARRIORS 2.300 
RAMBO 2.300 
WORLD CUP (DISCO) 3.300 
MILLION II (DISCO) 3.300 

tos. KUNG-FU MASTER 2.300 pros. 
:tos. SABOTEUR 2.300 pros. 
tas. PING PONG 2.300 ptas. 
tos. MILLION II 0000 pros. 
tas. OLE TORO 2.300 ptas. 
tas. TURBO ESPRIT 2.100 ptas. 
tas. SABRE WULF 1.650 ptas. 
tas. BATALLA DE LOS PLANETAS 2.100 ptas. 
tas. SABOTEUR-COMBAT LINX DISCO 3.300 ptos. 

RAMBO-MATCH DAY (DISCO) 3.300 ptas. 

SOFTWARE DE REGALO (OFERTA 2xl) 
DECATHLON BEACH HEAD SOUTHERN BELLE 
DRAGONTORC 

" LAPIZ OPTICO SINTETIZADOR DE VOZ EN  
3.295 PTAS. CASTELLANO 
I 
7.650 PTAS. 
CASSETTE ESPECIAL ORDENADOR AMPLIACION DE MEMORIA ANTA 64 K.3 
5.295 PTAS. 12.500 PTAS. 

i2 IMPRESORAS i 
0% DE DESCUENTO SOBRE P.V.P. 

TAPA DE METACRILATO 464 
CABLE CENTRONICS 
CABLE SEGUNDA UNIDAD D. 
CABLE SEPARADORES 6128 
INTERFACE RS232 
CINTA VIRGEN C15 

895 
3.175 
1.790 
1.975 
9.265 
69 

CABLE AUDIO 
CABLE ADAPTADOR 2 JOYSTICK 
CABLE SEPARADORES 464 
CABLE SEPARADOR 8256 
CABLE RS232 
DISKEI-rES 3" 

795 
2.390 
1.390 
2.900 
2.500 
990 

PRECIOS EXCEPCIONALES PARA TU AMSTRAD 
CPC-464, CPC-6128, PCW-8256 

iiLLEGARON LAS REBAJAS DE VERANO A MICRO 1!! 

OFERTAS EN JOYSTICKS 
QUICK SHOT I 1.395 
QUICK SHOT II 1.695 
QUICK SHOT V 1.695 

PEDIDOS CONTRA REEMBOLSO SIN NINGUN GASTO DE ENVIO TEL. (91) 274 53 80 
O ESCRIBIENDO A: MICRO-1. C! DUQUE DE SESTO, 50. 28009 MADRID. 

Tiendas y distribuidores grcndes descuentos. 
Dirigirse a Diproimsa. CI Galatea, 25. Tel. (91) 742 20 19 6 742 79 68 



5oon, 5omb Jock Commonco... 
'oos s hroes 9re {eric°s i un'°s en esfe nOmero, 
ro civerre o oge. 

AfiolI.N" 15 

BATMAN 

.z /z¢ • 
, iii/f//" 



PUZZLEMIND 

Puzzlemind es un programa muy poco corriente, y re6ne todas los 
cualidade$ para merecer este apelativo: es muy original, muy bonito y 
muy adictivo, con varios niveles de destreza paraque .todos.,. desde el 
despistado al (memori6n)), tengan su rato de dverson. 

Adem6s, para los programadores Io digo, est6 escrito en un Basic muy 

paciente y laborioso, que merece la pena estudiar, tanto para aprender 
Io que se debe o no se debe hacer, seg6n los gustos. 

Desde luego, Puzzlemind es un programa raro, bastante diflcil de 
re$olver, y que puede ser la respuesta a esas tardes terribles de agosto, 
en pleno abandono estival, cuando todo el mundo menos t6, (EI Gran 
Insomne)), est6 entregado a filos6ficas disquisJciones con la almohada. 
iCaray!, la siesta. 

 I programa que 
mando es un juego, concretamente 
un PUZZLE. Tiene tres niveles de di- 
ficultad y un nOmero limitado de ayu- 
das por nivel. Ls un juego muy sen- 
cillo que pone a prueba la capacidad 
de <<retentiva, del jugador y su habi- 
lidad para visualizar el conjunto de 
piezas y colocarlas en el lugar co- 
rrecto, sabiendo distribuir a Io largo 
del juego el ngmero de consultas al 
PUZZLE de ayudas para no quedar- 
se colgado y poder completarlo con 
la m6xima puntuaci6n. 
El propio programa se encarga de 
explicar su funcionamiento y la utili- 
zaci6n del teclado en las instruccio- 
nes yen las bases. 
El programa es compatible con to- 
dos los CPC. Lo he grabado por las 
dos caras por aqu611os de los <duen- 
des. No me queda mcs que felici- 
taros por vuestra revista queen mu- 
chos casos me ha ayudado a com- 
prender mejor el funcionamiento de 
mi Amstrad, muy aclarativa. Gra- 
cias. 
Esperando que mi programa gus- 
te, se despide: 
Marize Benayas Pazos 
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ABLA$ Y VARIABLES 
T Table con e/puzzle complete 
pore mostror los bases ale co- 
da niveL 
Tabla con los coordenadas de 
/as piezas de muestra y elec- 
ddn. 
Tobla con los coordenodos de 
los piezas qua el/ugador 
de colocar en el puzzle. 
Table con el puzzle complete 
pare/as ayudas. 
Table donde se guardan los 
ndmeros de los plazas aleato- 
riamente. 
Ndmero de ayudas segdn el 
niveL 
Errores, puntos nega#vos. 
Adertos, puntos positives. 
Total de elementos ale/a ta- 
ble PG. 
Total de elementos de le la- 
bia PP. 
Total de elementos de/as ta- 
bles T y M, 
Contaalor de puntuaddn ob- 
tenida. 
Contador de adertos. 
Eleccidn de nivel de dificultad. 

PG 

PP 

NP 

HL 
PNEG 
PPOS 
TPG 
TPP 
TT 
PUNT 
ACIE 
NI 

I ' P U Z Z L E -PORTADA- 
2 MODE I:BORDER O:INK O,n:INK 1,25: 
l ll< 2,11:INK /=:SYMBOL AFTER 32:L0 
EATE 7I2:PEN I:PAPER O:PRINT"[ QUI 
ERES ITRUCCIONES9 ]" 
3 a$=UPPER${INKEY$):IF a$=""AND 
"S" AND aIK>"N"THEN 3 
4 IF a$--"S" THEN 
5 30TO 3 
/= DATA 478,BO430797047B30 
37950478,50379,800,30 
7 DATA 280377,30,3582335823, 
B DATA 79,8035830319703790 
317503795031980030 
@ DATA 5B8031730284232S423 
3173o,35830284,80,030 
10 DATA 3197047B23426237923 
5823319,3028480020 
11 DATA 2847042b2337923SB23 
31923,2843025380020 
12 DATA 253703792335823I?23 
28423,25330,239,B0,020 
13 DATA 23950,253028,30,358,b0 
239,30319,a023%100030 
14 RESTORE :ENT IIO15I4:ENV I4 
15 FOR v-O TO 
1& READ 
17 IF INKEY$<> .... THEN RELEASE I:RET 
URN 
18 SOUND lndu11l12 
19 NEXT 
20 GOTO 
21 MODE 
22 LOCATE 1123:PAPER O:PEN I:PRINT 
"[ POR FAVOR ESPERA ]':POR as-1 TO 
5:FOR ap=1 TO 400:INK I25:NEXT:FO 
R de I TO 400:INK IO:NET:NEXT 
23 INK IO:INK O:INK 30 
24 MODE 1:te$ "PUZZLE": 1:y 
:yy 
25 FOR I-I TO LEN(te$}:a$-MID${te$ 
II):GOSUB 2a:=+IIO:NEXT I:GOTO 
32 
2 p :-yy:LOATE y:PRINT aS 
27 FOR n-b TO b-l& STEP -:FOR m=a 
TO a÷16 STEP 
28 IF TEST{mn} THEN GOSUB 
29 p R+IO 
k 0 NEXT m: -IO:-:NEXT n:RETURN 

PItOGRAMA 

1-36 Portada (presentacidn). 
37-74 Instrucciones y eleccidn del ni- 
vel. Sentencias ON ERROR... 
y ON BREAK... Lfmites del 
temporizador EVERY. 
75-148 Dates de los nive/es y los di- 
ferentes puzzles. 
149-189 Control y Ilenado de tab/as. 
190-196 Fin de la carga. 
197-225 Inicializa y muestra /as bases. 
226-271 DefinitiOn de letras. 
272-280 Definicidn de grficos. 
281-296 Impresidn. 
297-316 Cuadriculacidn de/as piezas 
y los puzzles. 
317-332 Pista inicial. 
333-345 Inicio del juego. 
346-374 PROGRAMA PRINCIPAL. 
Elecddn de/as piezas o ayu- 
dos. 
375-391 Rutina de ayudas. 
392-34 Rutina de tratamiento de 
errores y ruptura del progra- 
me, 
3-403 Temporizador EVERY. Fin de/ 
programa. 
404-41, ... has perdido, despedida. 
415-425 ... has ganado, fe/icidades. 

31 FOR t-O TO 7:MOVE R+IOR-t:DRAWR 
8,0:MOVE q-t+B:DRAWR 8OINT(R 
ND2)+I:NEXT:RETURN 
32 WINDOW i40I7:PAPER :LS:WIND 
OW 239,38:PAPER I:CLS:WINDOW 140 
 1725:PAPER 3:CLS:WINDOW 239I,2 
4:PAPER 2:CLS 
33 DATA P .... R" "E," "S," "I" 
"0, .... N .... A .... ,U, .... N, .... 
A .... T .... E .... C, .... L" "A 
34 INK I25:INK 2,18:INK 3,&:LOATE 
I25:PEN :PRINT CHR$(Ib4);" Mar= 
P Benayas 1986" 
5 WINDOW 1,40,125:LOCATE 320:RES 
TORF IX:FOR i-I TO 31:READ iS:PEN 
:PRINT t$I:FOR pa=1 TO 5r:NEXT:NEX 
T 
36 GOSUB 
7 
INSTRUCCIONES 
8 MODE I:BORDER O:WINDOW I40I,25 
:PAPER O:LS:PAPER O:PEN 3:INK I25 
39 FOR b-2 TO 12:LOCATE bI:PRINT C 
HR$(197):NEXT 
40 FOR b 2 TO 3:LOCATE 13b:PRINT C 
HR${|98):LOCATE 29b:PRINT CHR$(19& 
):NEXT 
41 FOR b 14 TO 2B:LOCATE b4;PRINT 
CHR$(197):NEXT 
42 FOR b-30 TO 39:LOCATE bI:PRINT 
CHR$(I97):NEXT 
4 FOR b 2 TO 24:LOCATE 40,b:PRINT 
CHR$(IqS)=LOCATE I,b:PRINT CHR$(19 
):NEXT 
44 FOR b-2 TO 3?:LOCATE b25:PRINT 
EHR$(i99):NEXT 
45 PAPER O:PEN 1:LOCATE 152:PRINT" 
INSTRUECIONES" 

4q LOCATE 8,16:PEN 2:PRINT"[";:PEN 
I:PRINT"N";:PEN 2:PRINT"]":LOCATE 
mcar":LOCATE 15 17:PRINT"eKa pieza 
y desea":LOCATE 15, 18:PRINT"qu 
50 LOCATE 820:PEN 2:PRINT"[":PEN 
I:PRINT"A";:PEN 2:PRINT"]":LOCATE I 
520:PEN I:PRINT"Si neesitas ayuda 
5I LOCATE 1123:PEN 2:PRINT"[ ":PEN 
I:PRINT"PRESIONA UNA TECLA":PEN 2 
: PR I NT" ]" 
52 WHILE INKEY$ ..... :FOR ap I TO 300: 
INK 2I:NEXT:FOR de 
I1:NEXT:WEND 
53 BORDER O:INK OO:SYMBOL AFTER 
:WINDOW 2,39524:PAPER O:CLS:WINDO 
W 1,40 I25 
54 LOCATE 3IO:PEN 3:PRINT"I";:PEN 
J:PRINT" Tiens TRES niveles de dzf 
iultad: " 
55 LOCATE 12I:PN 2:PRINT"(":PEN 
1 : PRINT" I " ; :PEN 2:PRINT"] ";:PEN 
5& LOCATE 12,15:PEN =PRINT"£";:PEN 
I: PRINT"2"; :PEN 2:PRINT"] ";:PEN 
57 LOCATE 12 17:PEN 2:PRINT"[";:PEN 
I : PRINT"3" ; : PEN 2: PRINT"] ";:PEN 
58 LOEAT I2.':PEN 2:PRINT"[";:PEN 
I:PRINT"QUE NIVEL QUIERES";:FEN 2: 
PRINT"]" 
59 a$ INKEY$:IF a';."1" AND a$/,%"2" 
AND a$:%"3" THFN FOR ap I TO I¢0:I 
F a$="I '' AN[) a="2" AND aS="3" HEN 
60 ELSE INK 2 I:NEXT:FOR de I" TO I 
O0:IF aS "I" AND a$="2" AND aS "3" 
THEN 60 ELSE INK 2:11:NEXT:r'..OTO 59 
/=0 ni VAL(aS) 
&l MODE I:BQRDER 
62 xiz l:de 40:yar=1:yab=25:l 
3 WINDOW .izde,yar,yab:PAPER 
64 xi xiz+:xd=xd-3:ya=yar+3:ya 
a5 IF y. iz 13 THEN WINDOW 122912I 
4: PAPER O: CLS: GOTO 
b& DATA "C", "A", "R", "G", "A" "N" "D" 
, "O", .... , "D", "A", "T", "0"  "S" 
67 RESTORE 6b 
68 LOCATE 2:FOR x 1 TO 14:READ b$ 
:PAPER O:PEN I:PRINT b$;:FOR t=1 TO 
.300: NEXT: NEXT 
70 ON BREAK OOSUB 
71 ON ERROR GOTO 393 
72 EVERY 50I GOSUB 39/= 
73 KEY 140"mde 1:brder O:ink 
ist "+EHR$ (13) 
74 KEY DEF 70140 
75 REM 
- NIVEL I - 

4 LOCATE ,7:PEN 3:PRINT"$";:PEN 1 ........... T .... 

:PRINT" Te ire moLrand una a una 
todas":LOCATE tB:PRINT"Ias piezas 
deI PUZZLE• " 
47 LOCATE 4IO:PEN 3:PRINT"I";:PEN 
I:PRINT" Tu Ia elegira pulsando : 
48 LOCATE I I:PEN 2:PRINT"E";:PEN 
I:PRINT"S"|:PFN 2:PRINT"]":PEN I:LO 
EATE 15,1:PRINT"Si uieres {lar 
Ia":LOCATE 1514:PRINT"pieza m 

7 DATA 68567,BI0172113?2 
77 REM 
-PG---Cdenadas venta 
7 DATA 27,6I0,17,,36,12,15,29 
3&I017,27,30,12,15,31,34,1,17,35 
,36121729,36I017,2930,1217,3 
79 DATA 

uCO,OSr AMSTRAD ;27 



13&,10,1729,3&,lO, 17,293&,10,17 
DO DATA 
81 DATA 31,36,10,13,29,30,10,17,29, 
36, I0,17,29,32,10,13,33,3,I0,17,29 
,34,10,17,27,32,10,17,27,36,10,17,3 
3,34,10,17,29,34,10,17:29,34,12,17 
82 DATA 35,36,10,11,29,34,10,11,29, 
3&,10,17,29,30, lO, ll,31,3&,14,17,29 
,4,10,17,33,34,10,17,27,32,14,17,2 
9,36,10,17,29,32,10,17,33,36,14,17 
87 DATA 29,34,10,17,33,6,10,13,27, 
34,10,17,27,34,10,13,29,34,10,17,29 
,36,10,17,,36,10, I,29,34,10,17,2 
9,72,10,17 
84 REM 
-PP---Cflorenadas venta 
85 DATA 4,7,4,7,4,7,5,,8,11,4,7,8, 
8,54,9,10,7,7,11,11,5,7,12,154,7, 
12,12,5,7,13,15,7,7,16,19,4,7,16,19 
,7,7 
84 DATA 20,27,4,7,20,70,7,7,4,7,8,1 
1,8,11,8,11,9,11,8,|1,11,11,8,1112 
,15,8,11,12,12,8,11,13,15,8,11,14I 
67 DATA 18,19,1011,20,23,8,11,20,2 
0,8,?,2021I0,11,4,7,12,15,6,7,13, 
15,8,11,12,13,8,10,13,15,9,10,1212 
|1,11,12,15,12,15,12,15 
I?,1215,16,17,12,13,18,19,1,15,20 
,2,12,15,20,2112,15,4,7,16,17,6,7 
,14,19,8,11,16,19,8,10,17,17 
89 DATA 11,11,14,14,8,10,14,16,12,1 
5,14,19,12,12,16,16,13,15,18,19,16, 
19,14,19,18,19,14,19,14,17,18,19,20 
,2314,19,20,21,14,17,2223,18,17 
90 DATA 4,7,2023,4,7,20,21,8,11,20 
,23,8,10,20,21,12,15,20,23,14,19,20 
,,18,19,20,21,20,2,20,23,20,21,2 
0,21 
91 REM 
92 DATA 
3,37,3714,22:3,31,32I0:18,3,27,30 
,Ib,22,6,29,0,19,22,13,28,29,10, I0 
,7 
97 REM 
-PG y PP--numer de la 
pieza-- 
94 DATA 1,1,2,2,2,2,3,3,3,4,4,5,5,6 
1,14,17,17,17,171fl,18,1fl,19,19,19 
,20,20,20,21,21,22,22,23,24,2425,2 
5 
95 REM 
-PG y PP--Ir pieas- 
94 DATA 
97 REM 
-PG y PP--rdenada h 
rin-- 
98 DATA 1,1,2,2,2,2,3,3,3,4,4,5,5,1 
,2,2,2,3,3,3,4,4,4,5,5,5,1,1,,2,, 
,4,4,4,5,5,5,1,1,2,2,3,4,4,5,5 
99 REM 
- NIVEL 2 - 
........... T .... 
100 DATA 4,5,6,8,3,4,20,10,19,13,11 
,7,?,15,20,22,2,11,11,2022,3,13,17 
,17,20,7,8,13,5,7,7,18,22,a,7,7 
101REM 
-PG---rdenadas venta 
I0 DATA 29,36,10,17,27,32,14,17,9 
,36,1017,27361217,?,36,10,17, 
932,11,17,3,36,14,17,27,36,10,17, 
29,30,14,17,3,36,14,17,936I0,17 
103 DATA 9,34,14,17,9,36,10,1729 

29,32,10,17,33,36,10,17,29,36,10,17 
104 DATA 27,2,10,17,3,36,14,17,29 
105 DATA 29,32,10,11,33,34,10,11,29 
29,34,10,17,33,36,10,17,27,34,10,17 
104 DATA 29,4,10,17,29,36,1017,29 
29,32,12,17,29,34,10,|7,29,30,10,17 
107 DATA 
108 REM 
-PP---G=ordenadas venta 
nas ..... 
109 DATA 4,74,7,4,5,4,7,8:11,4,7,8 
,23,4,7 
110 DATA 20,22,4,7,4,7,8,11,4,5,8,8 
114 DATA 4,7,20,23,8,11,20,27,9,10, 
20,22,11,11,202,1215,20,23,12,15 
7,20,20,20,2,20,23 
115 REM 
114 DATA 24,24,11,12,3,28,38,17,20, 
117 REM 
-PG y PP--numer= de la 

,19,20,20,21,22,22,22,27,23,23,24,2 
4,25 
119 REM 
-PG y PP--lr piezas 
120 DATA 0,3,0,3,0,3,3,0,3,7,0,3,0, 
3,1,0, I,3,0,3,2,,2I,0, I,0,1,0, I3 
3,0, I,2,3,0,10,0,2,3,0,2,3,0,3,0 
121REM 
-PG y PP--=ordenada h 
orizon-- 
122 DATA 
,,,,3,4,4,4,4,5,5,1,12,2,3,3,3, 
3,44,4,4,5,5,1,2,2,2,3,3,3,4,4,5 
123 REM 
- NIVEL 3 - 
124 DATA 4,6,9,13,,5,22,8,18,13,6, 
13,19,21,7,7,13,&,8,7,8,9,22,23,3,1 
0,13,5,11,2,14,17,19,21,2,21,2,6,9 
,7,22,23,22,23,3,14,20I0,14,77,23 
,14,15,2 
125 REM 
-PG---Crdenadas vnta 
124 DATA 29,36,10,17,35,76,14,17,29 
,36,10,17,33,34,12,17,27,32,14,17 
127 DATA 31,4,10,17,35,34,10,11,29 
,30,12:17,29,3,I0,17,33,34,10,17,2 
?,2,10, II,29,2,12,17,29,36,10,17, 
126 DATA 27,36,10,17,29,4,10,1,29 
129 DATA 29,34,10,17,29,74,10,13,29 
I0 DATA 29,74,14,17,71,34,10,13,29 
132 DATA 29,32,14,17,27,4I0,17,29 
13 REM 
-PP---Cordenadas venta 
134 DATA 4,7,4,7,7,7,4,7,8,11,4,7,1 
7,16,19,4,7,20,23,4,7,21,23,4,74,7 
,8,11 
135 DATA 5,7,8,11,77,8,B4,4,9,11, 
8,9,20,20, I0,11,4,7,12,15,57,1215 
,7,7,14,15,4,4,12,13 
5,12,13,12,15, i4,15,16,19,12,15,14, 
138 DATA 20,23,14,15,21,22,12,13,20 
139 DATA 12, i3,19,19,14,15,17,19,16 
0,23,16,19,20,22,14,18,4,7,20,23,6, 
140 DATA 89,22,23,12,15:20,21,i2, i 
3,20,21,14:152021,14,17,2023,14, 
17,20,21,20,27,20,23,22,23,22,23 
141 REM 
142 DATA 26,26,1,15,3,2739,12,17, 
13,2B32,20,21,7,28,29,1112,7,29,3 
0,22,,,30,,I0,14,2,3,5,20,21 
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,2,9,40,11,|2,7,40,40,23,2,3,34,3 
8,13,16,7,28,40,17,17,2 
143 REM 
-PG y PP--numerQ de la 
pieza-- 
144 DATA 
&,7,7,7,7,8,8,8B,9,9,9,10,10,101 
4,14,14,15,15,15,15,16,1&,l&,17,17, 
17,18,18,18,18,17,19,19,20,20,21,21 
,2,22,22,23,2x,23,24,24,25,25 
145 REM 
-PS y PP--IQr iezas 
146 DATA 
3,0,2,3,1,0,2,1,3,0, I,3,0, I,3,3,0,I 
,0,3,2,02,0,3 
147 REM 
-PC y PP--rdenada h 
orizn-- 
148 DATA 
1,2,2,2,2,3,3,3,3,4,4,4,5,5,5,5,1,1 
149 " 
CONTROL DE TABLAS 

150 DIM 
151 IF ni=1 THEN tt 7:RESTORE 7:GQ 
SUB 15&:tpS-64:RESTQRE 78:GOSUB 159 
:tp 64:RESTORE 85:GOSUB Ib2:RESTOR 
E 92:R &4:GOSUB I5:RESTORE 94:SOS 
UB 168:RESTORE ?b:OOSUB 170:RESTORE 
98:GOSUB 173:GOSUB 17a:hl-15:neg= 
i:pps IO:GOTO 180 
152 IF ni=2 THEN tt IO:RESTORE 100: 
SOSUB 156:t=65:RESTORE I02:GOSUB 
159:tpp 65:RESTORE I09:GOSUB 1&2:RE 
STORE 11b:pg 65"GOSUB 165:RESTORE I 
18:GOSUB laB:RESTORE 120:GOSUB 170: 
RESTORE 122:GOSUB 173:GOSUB 177:hi 
10:pneg=l:pos 5:GOTO 180 
15 IF hi-3 THEN tt 11:RESTORE 124: 
GOSUB 15a:tg=74:RESTORE 12b:GOSUB 
157:t 74:RESTORE 134:GOSUB 162:RE 
STORE 142:pg-74:GOSUB 165:RESTORE 1 
44:SOSUB 168:RSTORE 14&:GOSUB 170: 
RESTORE 148:SOSUB 173:80SUB 178:hl- 
5:pne8 5:os 5:GOTO 180 
154 SOTO 59 
155 ' 
llenad T 
15& FOR x I TO it:FOR y 1 TO 5:READ 
a:t(,y) a:NEXT:NEXT 
57 RETURN 
158 " 
llenado PG ssl ventana 
59 FOR x-1 TO t8:FOR y-2 TO 5:REA 
D b:g(z,y)-b:NEXT:NEXT 
160 RETURN 
1I 
llenado PP sol ventana 
62 FOR z I TO tpp=OR y- TO 5:RA 
D c:pp(x,y)-c:NEXT:NEXT 
I&3 RETURN 
l&4 
llenado M 
Ia5 FOR  1 TO it:FOR y-1 TO 5:READ 
d:m(,y)-d:NEXT:NEXT 
1&& RTURN 
167 ' 
llenado PG-PP numero de 
ieza 
I FOR  I TO g:READ 
Rp(,I)=d:NEXT 
169 RETURN 
170 " 
llenadQ PG-PP Ir piez 
;I FOR x-1 TO pg:READ 
pp(,6)=e:NEXT 
172 RETURN 
173 ' 
IIenadg PG-PP 

horiz. 
174 FOR =1 TO p8:READ 
pp(,7) T:NEXT 
175 ' 
llenad PO-PP Qrdenada 
vert. 
17b FOR x-1 TO 
-I:NEXT:FOR x 14 TO 2:pg(x,B) 2:gp 
(z,8) 2:NEXT:FOR x=27 TO 40:(z,B) 
=3:gg(,8) 3:NEXT:FOR x=41 TO 55:pg 
(,S) 4:p(x,8)=4:NEXT:FOR x 56 TO 
64:ps(x,B)=5:pp(x,8) 5:NEXT:RETUrN 
177 FOR  I TO 
I:NEXT:FOR x=13 TO 2:pg(x,8) 2:pp 
(xS)-2:NEXT:FOR x-27 TO 
=3:pp(x,8) 3:NEXT:FOR x 42 TO 55:pg 
(z,S) 4:p(x,S)=4:NEXT:FOR x-56 TO 
&5:p(x,B)=5:pp(x,B)-5:NEXT:RETURN 
178 FOR x=1 TO 
1:NEXT:FOR x-li TO 29:pg(x,8) 2:p 
(x,8)=2:NEXT:FOR =30 TO 
3:Rp(X,8) 3:NEXT:FOR x-48 TO 2:gg 
(zS)-4:p(x,8)-4:NEXT:FDR x b3 TO 
74:pg(xB)=5:p(x,8) 5:NEXT:RETU 
179 ' 
llenadg NP -numerg de 1 
a ieza- 
180 v 0:np(5,5)-25 

181 FOR f-1 TO 5:FOR = I TO 5 
182 b=INT(RND$24)+I:IF b 25 THEN 18 
2 
183 FOR x 1 TO 5:FOR y I TO 5 
184 IF b-np(x,y) THEN 182 
185 IF v-24 THEN 189 
18a NEXT:NEXT 
187 np(f,) b:v v+i 
188 NEXT:NEXT 
189 unt-O:aie-O 
190 ' 
Fin de la ara 

191 DATA "F""I","N"," ","D","E"," 
", "L", "A", .... , "C", "A", "R", "G", "A" 
192 DATA "P" , "R", "E", "S", " I " , "0" , "N 
193 LOCATE 2,2:PAPER O:PRINT SPACES 
(15) 
194 RESTORE 191:LOCATE 2,2:FOR za I 
TO 15:READ ztt$:PEN I:PRINT zu$;:FO 

1 

R t 1 TO IO0:NEXT:NEXT:FOR t I TO 1 
O00:NEXT 
195 RESTORE 192:LOCATE 22:PRINT SP 
ACES(15) 
196 LOCATE 1,2:FOR =a I TO 18:READ 
zu$:PEN 1:PRINT zu$;:FOR t-1 TO 100 
:%XT:NEXT:CALL &BBIB 
197 ' 
INICIALIZA 

198 INK 1,0:INK 2,0:INK 3,0 
199 NINDOW#I,I,40, I,25:PAPER#1,13:C 
LS#1 
200 WINDOW ,21,3,21:PAPER O:CLS 
201 WINDOW 4,23,4,23:PAPER O:CLS 
202 FOR =1 TO tt 
203 WINDOW 
,4):PAPER t(x,5):GLS 
204 NEXT 
205 GOSUB 298 
20 WINDOW 25,40,2,7:PAPER 2:CLS 
207 WINDOW 26,3?,3,&:PAPER 3:CLS:NI 
NDOW 1,40,1,25 
208 GOSUB 227:GOSUB 273:GOSUB 282 

209 WINDOW#2,25,40,8,25:PAPER#2,13: 
CLS#2 
210 LOCATE#I,25,9:PAPER#I,13:PEN#I, 
O:PRINT#1, .... ;:PAPER#I,2:PRINT#I,"N 
IkL";ni;": ";"BASES" 
211LOCATE#1,2&,IO:PAPER#1,13:PEN#1 
,Z:PRINTeI,STRING$(15,"-") 
212 LOCATE#1,3012:PRINT#I,STRING$( 
5,"$") 
21 LCATE#1,25,14:PAPER#I,13:PEN#I 
,O:PRINTeI,"-";:PAPER#1,2:PRINT#I," 
AMudas";:PAPER#l,lZ:PRINT#1," .....  ;:IF LEN(STR$(hl))=2 THEN PAPER#1,3 
:P£N#1,1:PRINT#I," ";hi:ELSE PAPER# 
1,3:PEN#I,I:PRINT#1,hl 
214 LOCATE#I,25,16:PAPER#1,13:PEN#1 
,O:PRINT#I,"-";:PAPER#1,2:PRINT#I," 
Puntos":LOCATE#t217:PRINT#1,"ne 
ativos";:PAPER#1,13:PRINT#I,"..";:P 
APER#13:PEN#II:PRINT#1" ";pne 
215 LOCATE#I,25,19:PAPER#1,13:PEN#1 
O:PRINT#1,"-";:PAPER#1,2:PRINT#I," 
Puntas":LOCATE#),2&,20:PRINT#1," 
itivs";:PAPER#1,13:PRINT#I,".."; 
216 IF LEN(STR$(ppgs))< THEN PAER 
#I3:PEN#II:PRINT#I," ";pp=s ELSE 
PAPER#I,3:PEN#1,1:PRINT#I,ppos 
217 LOCATE#l,30,23:PAPER#I,13:PEN#I 
,3:PRINT#1,STRING$(5,"$") 
218 WINDOW#325,40,11,25:PAPER#3,3 
219 WINDOW#4,28,37,?,18:PAPER#4,0 
220 WINDOW#5,28,719,25:PAPER#5,3 
221 WINDOW#6,2a,40,9,23:PAPER#6,0 
222 cn$-"C 0 L U M N A S.":LOCATE#I 
,6,1:PAPER#1,1:PEN#I,0:PRINT#Icn$ 
22 DATA "F"," ","I"," ","L"," ","A 
224 FOR zas-10 TO 1S:READ pun$:LOCA 
TE#I,I,zas:PAPER#|,I:PEN#1,0:PRINT# 
I,pun$:NEXT 
225 INK 1,25:INK 2,18:INK 3,6:BORDE 
R 25:GOTO 292 
22 ' 
Definition de letra 
27 SYMBOL AFTER 12 
228 SYMBOL 124,&XI,&XII,&XIII,&X111 
229 SYMBOL I25,&XIIIOOOOO,&X1111000 
O,XI1110000,&X11110000,&X11110000, 
&XIIIIOOOO,&X11110000&X11110000 
20 SYMBOL 126,&XII110000&XII11000 
O,&XI1110000,&XIIIIOOOO&X11110000, 
&X11110000,&X11110000,&X1100000 
231 SYMBOL 127,&XIII,&XIII1,&X11111 
,XI11111,&X111100,&XIIIIOO,&X11000 
,&XO 
23 SYMBOL 128s&XIIIOOOOO,&X1111000 
O,&XIIIIIOOO,&XII111100,&XI111100& 
XIII100,&XI11100,&X1111100 
233 SYMBOL 127,&XII,&X1111,&X11111, 
&XII1111,&XI11111,&XIIII11,&X111111 
,&XI1111 
234 SYMBOL 130,&XIIIIIIOO,&X1111100 
O,&X11110000,&XIIOOOOOO,&X11111100, 
&X11111110,&X11111110,&X11111100 
235 SYMBOL 131,&XII111,&XI11111,&XI 
11111,&XIIIII,&XO,&XO,&X1,&X11 
236 SYMBOL 132,&XI1111100,&X1111111 
O,&XIIIIII10,&XI1111110,&X1111100,& 
X11111000,&XIII10000,&X11110000 
27 SYMBOL 133&XI,&X11000,&XII1100 
,&XIII100,&X11111I,&XIII11,&X11111, 
&Xl111 
238 SYMBOL 134,&XIIIIIOOO,&X1111110 
O,&XI111110,&XI11110,&XI1111110,&XI 
1111110,&X11111100,&X11110000 
239 SYMBOL I5,&XO,&X1,&XII,&X111,& 
XII11,&XlIlI1,&X1111IO,&X1111111 
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240 SYMBOL 136,&XIIOOOOOO,&X1110000 
O,&XIIIOOOOO&XIIOOOOOO,&XIO011000, 
&X111100,&X111100,&XIIIIIIO0 
241 SYMBOL 137,&XIIII111,&X111111& 
X11111,&XO&XO,&XO&XO,&XO 
242 SYMBOL 138&X11111110,&X1111111 
O&XIIIIIIOn,&XIIIIOO,&XIIllOO,&Xll 
1100,&XII1100&XtIO00 
243 SYMBOL 137,&XI1111&XII111I,&X1 
11111&XIIIII1,XIIIIOO,&XI11111&X 
111111,&XII1111 
244 SYMBOL 140,&XI1111100,&Xt111111 
O,&XI1111110,&XII111110,&X1100,&XO, 
&XII1000AO&X11111000 
245 SYMBOL 141&X11111,&X11&X11000 
,XIIItOO,&XII1111&XI1111&X11111, 
&X111! 
246 SYMBOL 142,&XIIII1100&X1111111 
O&XIIII11,&XI11110&XI1111110,&X1 
1111110,&XII111100,&X11110000 
247 SYMBOL 143,&XI1111111,&X1111111 
I,&XIII11111&XI111II11&X11111111, 
&XIIIIIOOO,&X|I111111,&X11111111 
248 SYMBOL 144,&Xt1110000,&X1111100 
O,&X1111IIOO,&X11111100&X11111110, 
&XIItIOXtlt111IO,&X11111100 
249 SYMBOL 145,&XIIIIIOOO,&X1111100 
O&XI1111OO&X11111000,&X11111000 
&XII111000XIIIIlOOO,&XI1111000 
250 SYMBOL 146,XII1110,&XIi1110,&X 
I11110&X111110,&XIII110,&XIII110,& 
XlttIIO&X111110 
251 SYMBOL 147&XII111111,&X1111111 
I,&XIt111111&X11111111&X11111111 
&XO&XO,&XI 
257 SYMBOL 148,&XI1111110&X1111111 
O&X11111110,&XIII11110&X11111110, 
XIIilIO,-XIIIIIIXIIIIIIIO 
253 SYMBOL 149,tXI1111111,&X1111111 
&XOXO,&XI 
254 SYMBOL 150,&X11111110&X1111111 
O&XII11II10,&X11111110,&X11111110, 
&XtIIt10,&XIIII110,&X11111110 
255 SYMBOL 151&XI1111000,&X1111100 
O&Xt11110nO,&XI1111000,&X11111000, 
&XI1111000&X11111000&X11111000 
256 SYMBOL 
&XO,&XO,&Xn 
257 SYMBOL 15,&XI1111111&XtIIt111 
I&X11111111&XI1111111&X11111111, 
&XIII11000,XII111111&X|1111111 
258 SYMBOL I54,&X11111IIO,&XI111111 
O&XII111110&X11111110,&XI1111110 
&XO&XII100000,X11100000 
259 SYMBOL 155,XI1111111,&X1111111 
1&XIIII1111,&XIIIIIOOO&X11111000, 
&XIIIi1000,&XI1111000,&X111110qO 
260 SYMBOL 156,&X11111100,&XI111100 
261 SYMBOL 157&X11IIIOOO,&XI111100 
&X11111100,&X11111111XII111111 
&XIIIII11&X111111,&X111| 
262 SYMBOL 158,&XIII110,X111110,&X 
1111110,&XII111110=&XIIIlI110,&X111 
11100&XI1111000&X11100000 
263 SYMBOL 159,&XIII,&XIIIII,&XIIII 
111,XI1111111,&XI1111111,&X1111111 
I,&X11II1111,&X11111111 
264 SYMBOL 160,&XIII11100,&XI111000 
O,&X11000000,&X11111110,&XI1111110, 
&X11111110,&XI11111|O,&XII111110 
2&5 SYMBOL 161,&XIII,&X11111,&X1111 
111,&X11111111,&X11111111,&X1111111 
1,&XIIIII111,&X11111111 
266 SYMBOL I&2,&XI1111100,&XII11000 
O,&XI1000000,&X11111110,&X11111110, 
&X11111110,&X11111110,&X11111110 
267 SYMBOL 13,&X11111000&X1111100 
O,&XII111000,X11111111,&X11111|11 
&XIII11111,&X11IlIIII,&X11111111 
26G SYMBOL 164,&XO,&XG,&XO,&X111111 
IO,&X1111IIIO,&X11111110,&X11111110 
,&Xl1111110 
269 SYMBOL 165,&X11II1111,&X1111111 
1,&X11111000,&XII111III,&X11111111, 
&XIII11111,&XIII11111,&X11111111 
270 SYMBOL 16,&XI1100000,&X1110000 
O,&XO,&X11111110,&XI1111110,&X11111 
IIO,&X11111110,&X11111110 
271 RETURN 
272 " 

Definicion de grafc 
273 a15-CHR$(t24)+CHR$(125):a25 " " 
+CHR$(12) 
274 bi$ CHR$(127)+CHR$(128):b25 CHR 
$(129)+CHR$(130) 
275 ci$ CHR$(131)+CHR$(132):c25 CHR 
$(133)+CHR$(134) 
276 d15=CHR$(135)+CHR$(136):d25-CHR 
$(137)+HR$(138) 
277 ei$ CHR$(t39)+CHR$(140):e25 CHR 
$(141)+CHR$(142) 
27R a$-CHR$(143)+CHR$(144)+CHR$(145 
)+CHR$(14)CHR$(147)÷HR$(148)+CI 
$(149)÷CHR$(150)*CHR(151)+CHR$(152 
)+CHR$(153)*CHR$(154) 
279 b$ CHR$(155)+CHR$(tS)CHR$(157 
)+CHR$(158)*CHR$(15?)+HR$(160)HR 
$<161)+CHR$(162)÷CHR$(16)CHR$(14 
)+CHR$(165)+CHR$(166) 
2Gn RFTURN 
Impreson 
282 PAPER 3:PEN 
283 LOCATE 5,2:PRINT al$:LOCATE 5,3 
:PRINT a2$=LOCATE 2,5:PRINT al$:LOG 
ATE 2,6:PRINT a25 
284 LOCATE 9,2:PRINT bl$:LOCATE 9,3 
:PRINT b2$:LOCATE 2,9:PRINT bl$;LOC 
ATE 2IO:PRINT b25 
2E5 LOCATE 13,2:PRINT cl$=LOCATE 
3:PRINT c2$:LOCATE 2,13:PRINT 
LOCATE 214:PRINT c25 
286 LOCATE 172:PRINT dIS=LOCATE 17 
,3:PRINT d2$:LOCATE 217:PRINT di$: 
LOCATE ?,IS:PRINT d25 
287 LOCATE 212:PRINT eI$:LOCATE 21 
3:PRINT e2$:LOCATE 221:PRINT 
LOCATE 2,22:PRINT 
288 PAPER 3:PEN I 
289 LOCATE 274:PRINT a$ 
290 LOCATE 27,5:PRINT b$ 
291 RETURN 
292 GOSUB 298:GOSUB 29:GOTO 317 
293 LOCATE#1,,25:PAPER#2:PEN#1,O 
:PRINT#1,'°'PRESS ANY KEY'" 
294 IF INKEY$="" THEN 294 
2 LOCATE#1,6,25:PAPER#1,13:PRINT# 
1,SPACES(15) 
296 WINDOW 4,23,423:PAPER O:CLS:CL 
S#2:CLS#3:CLS#4 
297 " 
cuadricula puzzle grande 
298 FOR oi-47 TO 
299 ORIGIN ol,32:DRAN 1,319 
300 NEXT 
301 FOR o2 32 TO 367 STEP 64 
02 ORIGIN 47,n2:DRAW 319,1 
303 NEXT 
304 RETURN 
305 ' 
cuadricula ayudas 
30 FOR oi-399 TO 639 STEP 48 
307 ORIGIN oI32:DRAW 1,237 
30G NEXT 
309 FOR o2 32 TO 287 STEP 48 
310 ORIGIN 3?9,o2:DRAW 239,1 
311 NEXT:RETURN 
312 " 
cuadicula pieza muestra 
313 ORIGIN 447,129:DRAW 1,12G:ORIGI 
N 576,129:DRAW 112R 
314 ORIGIN 447,129:DRAW 128,1 
315 ORIGIN 447,?56:DRAW 12,I 
31& RETURN 
317 " 
pista initial 
318 a-INT(RND$24)+I 
319 FOR x=l TO 5=FOR y=l TO 5 
320 IF np(xy)-a THEN 323 
321 NEXT:NEXT 
22 GOTO 318 
32 np np(y):FOR z 1 TO tpp 
324 IF pp(z1)-np IHEN 327 
325 NEXT 
2 GOTO 
327 WINDOW pp(z,2),pp<z,3),pp(z,4), 
pp(z,5) 

2G PAPER pp(z,6):CLS:GOSUB 297 
329 IF z tpp THEN 
330 IF pp(z+1,1)-np THEN z-z+1:GOTQ 
327 
"3I np(x,y) 0 
332 punt=punt+ppos:acie acie+1 
333 ' 
inicio del juego 
334 w-1 
335 FOR x w TO 5:FOR y=1 TO 5 
33& IF np(x,y)=O THEN 337 ELSE 
337 NEXT:NEXT 
38 IF acie=25 THEN 397 
339 np-np(x,y):FOR z 1 TO tpg 
4 IF pg(z,1) np THEN zl-z:GOO 34 
2 
341NEXT:GOTO 
342 WINDOW pg(z,2),pg(z,3),pg(z,4), 
pg(z,5) 
34 PAPER pg(z,6):CLS:GOSUB 
344 IF z tpg THEN 346 
345 IF pg(z+1,1) np THEN z-z+t:GDTO 
342 
346 ' 
election  ayuda 
347 PAPFR#5,:CLS#5:I.OCATE#1,28,20: 
PAPER#1,3:PEN#1I:PRINT#I"-ESTE 
;:PAPER#1I:PEN#I,0:PRINT#1,"S/N":I 
F hi<I THEN hI=O:LOCATE#1,2822:PAP 
ER#t%:PEN#1,1:PRINT#I,SPACE$(IO):S 
OTO 
34G LOCATE#12G,22:PAPER#13:PEN#t 
I:PRINT#I"-AYUDA ";:PAPER#I,I:P 
EN#1,0:PRINT#I"A":LOCATE#1,t24:P 
APER#1,3:PEN#II:PRINT#I=STRING$(5, 
349 a$-UPPER$(INKEY$) 
50 IF a$<>"S" AND a$<>°'N" AND aS 
"A" THEN 
351 IF a$-°'N '' THEN 352 ELSE 354 
352 IF  5 THEN w I:GOTO 335 
35 w w+I:GOTO 
354 IF a$="S '° THEN 355 ELSE 376 
355 v-1 
356 s O:LOCATE#1,25,20:PAPER#I,3:P 
EN#1I:PRINT#1, ..... ;:PRINT#1,"DAME 
OLUMNA =;:PAPER#I,I:PEN#IO:PRINT#I 
,CHR$<241):PAPER#1,3:LOCATE#I28,22 
:PRINT#1,STRING$(11" 
357 a$ INKEY$ 
358 IF VAL(a$)<I OR VAL(a$)>5 THEN 
357 
359 IF sw 1 THEN b VAL(a$):GOTO 
3&O LOCATE#1,2520:PAPER#I=3:PEN#O, 
1:PRINT#1, ..... ;:PRINT#I,"DAME COLUHN 
A ";:PAPER#1O:PEN#I,3:PRINT#IHR$ 
(241) 
361 a VAL(a$):sw 1:LOCATE#12%22:P 
APER#13:PEN#I, I:PRINT#1,"-";:PRINT 
#I"DAME FILA "|:PAPER#1I:PEN#1 
,O:PRINT#1,CHR$(243):GOTO 357 
3&2 LOCATE#1,25,22:PAPER#13:PEN#1 
:PRINT#I"-";:PRINT#1,"DAME FILA 
";:PAPER#1,0:PEN#1,3:PRINT#1,EHR$ 
(43:FOR pa I ro 50:NEXT:PAFER#I, 
3:LOCATE#t,?52n:PRINT#1,STRING$(15 
.... ):IOATE#1,25,2?=PRINT#1STRING 
$(15, .... ) 
363 IF a-pp(zl,7) THEN 364 ELSE 71 
364 IF b pp(zl,8) THEN 365 ELSE 371 
365 WINDOW pp(zt,),pp(zl,3),pp(zl, 
4),pp(zl,5) 
36& PAPER pp(zl,):CLS:GOSUB 27 
37 IF zl tpp THEN 369 
38 IF pp(zt+l,l) np(x,y) THEN zl=z 
I+I:GOTO 
&? ENT I,I,15,:SNV I,tOO, 12,2:SOU 
ND 1,85,100,11,1,1:np(x,y)-O:punt 
unt+ppos:acie=acie+l:LOCATE#1,2&,7: 
PAPER#1,2:PEN#I,O:PRINT#1,"-PUNTOS: 
";:PEN#I:PRINT#IpunE:LOATE#1,2 
6,2:PEN#1,0:PRINTII,"-AYUDAS: 
N#1:PRINT#1,hl 
70 GOTO 334 
371 ENV 1,100,2,3:ENT 1,100, I,1:SOU 
ND 1,2842AO, 11,1,1:punt-p¢=nt-pneg: 
LOCATE#1,26,7:PAPER#1,2:PEN#I,0:PRI 
NT#1,"-PUNTOS: ";:PEN#I,3:PRINT#I,p 
unt:LOCATE#I,26,2:PEN#1,0=PRINT#I," 
-AYUDAS: "|:PEN#I,3:PRINT#1,hl 
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772 IF v-2 THEN LOCATE#1,30,20:PAPE 
R#I,3:PEN#1,1:PRINT#1,'TE HAS":LOCA 
TE#1,2B,21:PRINT#1"EQUIVOCADO":LOC 
ATE#129,22:PAPER#I,&:PEN#1,0:PRINT 
#1,"OTRA VET":FOR t=l TO 3000:NEXT: 
SOTO 47 
37 PAPER#5,3:CLS#5:LOCATE#1,0,19: 
PAPER#1,3:PEN#1,1:PRINT#I,"TE HAS": 
LOCATE#1,28,20:PRINT#1,"EQUIVOCADO" 
:LOCATE#1,28,21:PRINT#1,"INTENTALO" 
:LOCATE#1,29,23:PAPER#1,&:PEN#1,0:P 
RINT#1,"OTRA VEZ":FOR t I TO 3000:N 
EXT 
74 PAPER#5,3:CLS#5:v-v+I:GOTO 35b 
375 " 
AYUDAS 

37 IF a$ "A" THEN 377 ELSE 349 
377 ELS#2:ELS#6:hl hl-I:LOCATE#1,2& 
,2:PAPER#I,2:PEN#I,0:PRINT#1,'-AYL 
AS: ";:PEN#1,3:PRINT#1,hI:IF h1<O T 
HEN hl O:SOTO 378 ELSE 380 

378 PAPER#2,13:CLS#2:LOCATE#1,29,10 
:PAPER#1,2:PEN#I,0:PRINT#1,"LO SIEN 
TO":LOCATE#1,32,12:PRINT#1,"HAS':LO 
CATE#1,30,14:PRINT#I,"AGOTADO" 
379 LOCATE#1,31,1b:PRINT#1,"TODAS": 
LOATE#1,32,18:PRINT#1,"LAS":LOCATE 
#I,I,20:PAPER#I,3:PEN#1,1:PRINT#1, 
°'AYUDAS°°:GOTO 388 
380 FOR m-1 TO tt 
381 WINDOW mm,1},m(m,2},mm,3},mm 
382 PAPER m(m,5:CLS 
383 NEXT 
384 GOSUB 305 
385 DATA "1°',"2","","4""5" 
386 RESTORE 385:PAPER#1,3:PEN#I,2:F 
OR h=27 TO 39 STEP 3:READ g$:LOCAI 
#I,h,8:PRINT#I,g$:NEXT 
387 RESTORE 385:FOR h-lO TO 22 STEP 
3:READ g$:LOATE#1,25, h:PRINT#1,g$ 
:NEXT 
38 LOCATE#1,2b,24:PAPER#1,b:PEN#1, 
O:PRINT#1,'PRESS ANY KEY " 
389 b$-INKEY$:IF b$="" THEN 389 
390 PAPER#2,13:CLS#2:CLS#3:CLS#4 

. ¥ N 

391GOTO 339 
392 " 
Tatamiento de erro 
res Ruptura del 
rograma 
393 WINDOW 1,40,1,25:PAPER 8:PEN I: 
PRINT"ErFor';ERR;"en Iinea°';ERL:RES 

UME:END 
394 SYMBOL AFTER 32:WINDOW 1,40, I,2 
5:PAPER 8:PEN I:END 
395 " 
Temporizador 
EVERY 
39& IF acie 25 OR pun¢<O THEN 397 E 
LSE 403 
397 PAPER#2,13:CLS#2:CLS#&:FOR m-1 
TO it:WINDOW m(m,1),m(m,2),mm,3,m 
(m,4):PAPER mim,5):CLS:NEXT:GOSUB 3 
05 
398 IF punt<O THEN punt O:GOSUB 404 
399 IF acie 25 THEN SOSUB 420 
00 LOCATE#1,2&,24:PAPER#l,6:PEN#1, 
O:PRINT#1,"OTRA PARTIDA?'":LOCATE# 
1,2,24:PAPER#1,1:PEN#1,O:PRINT#1,"- 
HAS GANADO";:PAPER#1,2:PRINT#I,punt 
+hl;:PAPER#1,1:PRINT#1,"PUNTOS." 
401 b$ UPPER$(INKEY$):IF b$<>"S" 
D b$<>"N" THEN 401 
402 IF b$-"S" THEN ERASE t,m,pg,pp, 
np:CLEAR:GOTO I ELSE BORDER O:WINDO 
W 1,40125:PAPER 8:CLS:LOCATE 14,1 
3:PRINT '°- F I N -":LOCATE 1,1:END 
403 RETURN 
404 ' 
Adios con el topaz 
405 FOR t I TO 2000:NEXT:ENT 1,100, 
213:ENV 1,100,2,2& 
406 DATA 319,379,379,319,379,379,31 
9,358,358,358358,0,319,284,284319 
,253,284,319,358,379,379,379 
407 RESTORE 40:FOR v-1 TO 23:READ 
no:SOUND 1no,40, I1,I,3:FOR t 1 TO 
200:NEXT:NEXT 
04 RETURN 
409 WINDOW#I,1,2,1,2 
410 PAPER#I,I:CLS#1:LOCATE#1,1,1:PE 
N#1,0:PRINT#I,"-" 
411 PEN O:LOCATE 25,25:PRINT "" 
12 WINDOW SWAP 10 
413 FOR x-1 TO IO00:NEXT 
414 GOTO 410 
415 ' 
Felicidades 
41& DATA 319,40,284,40,284,33,253,3 
0,284,30,25330,237,33,317,70,0,10 
417 DATA 
84,30,284,30,253,30,284,30,253,30,2 
39,33,319,70,0,10 
418 DATA 31930,358,30377,30,358,3 
0,284,30319,30,358,30,379,30317,8 
0,0, I0 
419 DATA 239,30,213,30,189,40,0,3,1 
89,35,0,3213,4003,213,35,239,80, 
0,10 
42)0 RESTORE 416:ENV 1,2,1,2:ENT 1,0 
,I,IO:FOR t=l TO IO00:NEXT 
421 FOR x=l TO 41 
422 READ no,du 
423 SOUND l,no,du, ll,l,l 
424 NEXT 
425 RETURN 

I00.000 PESETAS 
CON MICROHOBB Y 

AMSTRAD 

SEMANAL 

Porque pretendemos que AMSTRAD 
SEMANAL sea tambin vuestra revista, 
hemos abierto una secci6n en la que se 
publicar6n los mejores programas orlgi- 
noles recibidos en nuestra redacci6n. Vo- 
sotros serais los encargados de realizar 
estas pgginas, en las que podris apor- 
far ideas y programas interesantes pa- 
ra otros lectores. 
Las condiciones son sencillas: 
-- Los programas se enviarn a AMS- 
11lAD SEMANAL en una cinta de casset- 
te, sin protecci6n en el software, de for- 
ma que sea posible obtener un listado de 
los mismos. 
-- Cada programo debe ir acompa- 
ado de un texto explicalivo en el cual 
se incluyan: 
-- Descrlpci6n general del programa. 

-- Tabla de subrutinas y variables uti- 
lizodas, explicando claramene la 

funci6n de cada una de elias. 
-- Instrucciones de manejo. 
-- Todos estos datos deber6n ir escri- 
tosa m6quina o con letra clara para ma- 
yor comprensi6n del programa. 
-- No se admi'ir6n programas que 
contengan caracteres de control, debi- 
do a que no son correctamente interpre- 
tados por las impresoras. 
-- En una sola cinta puede introducir- 
se m6s de un progroma. 
-- Una vez publicado, AMSTRAD SE- 
MANAL abonar al autor del programa 
de |S.OO0 a O0.O0g pesetas, en con- 
cepto de derechos de autor. 
-- Los autores de los programas selec- 
cionados para su publicaci6n, recibirn 
una comunicaci6n escrita de ello en un 
plazo no superior a dos meses a padir 
de la fecha en que su programa Ilegue 
a nuestra redacci6n. 
-- AMSTRAD SEMANAL se reserva el 
derecho de publicaci6n o no del progra- 
ma. 
-- Todos los programas recibidos que- 
dar6n en poder de AMSTRAD SEMA- 
NAL. 
-- Los progromos sospechosos de pla- 
gio ser6n eliminados inmediatamente. 

|ENVIANOS 
TU PROGRAMA! 
Ad/untando los siguientes datos: 
Nombre y apellidos,. 
direcci6n y telfono. 
Indicando claramente en el sobre: 

AMSTRAD S£A4ANAL 

HOBBY PRESS, S. A. La Granja, 39 
Pol. Ind. Alcobendas (Madrid) 

, coo  AMSTRAD 31 



TU P EDES FORMAR P RT D 

iComo Io oyes! T] puedes estar informado antes que nadie de todas las novedades 
que aparecen en el mercado, tener acceso a programas exclusivos y a precios 
especiales, poder conseguir los trucos que te ayuden a salir de esa pantalla que se te 
resiste, regalos, p6sters, sorteos, pegatinas.., y un mont6n m&s de ventajas. 

APUNTATE YA AL CLUB 

No Io pienses m&s. Site apuntas ahora al Club ERBE vas a recibir, adem&s, 

• como regalo de inscripciSf. ... ,--. 
.: . . ,=,:,, 1",.£.., '. ' 
El juego que mas te guste de nuestro catalogo  I , - ,- ", fl , 
 . ' ., 
 Una fabulosa camiset "on el anagrama del Club. 
Tu carnet personal de socio, que te dar& derecho a110% de descuento • , • 
en todos los juegos de ERBE que compres, durante un aSo, en cualquiera 
de los establecimientos que aqui al lado se relacionan (o a traves del Club si en tu 
zona no existiera ninguno). 

CAMISETA MOLONA 

TODO POR SOLO 3.000 PTS.... UN AUTENTICO CHOLLO 

Elige ya tu juego, corre al telfono y II&manos al (91) 447 34 10 o escribenos a ERBE SOTWARE 
C/. Santa Engracia, 17. 28010 Madrid para hacerte socio o pedir m&s informaci(n. 

* QUEDAN EXCLUIDOS LOS PROGRAMAS EN DISQUETE 



DISTRIBUIDORES AFILIADOS 

ALAVA 
DATAVL Avda Gaslez, 29. VITOR, 
ALMERIA 
INFORMATICA-ELECTRONICA. Arap les, 22 
ALICANTE 
INFORTRONICA. Doctor Jnenez Diaz, 2 ELCHE 
MICRO CENTRO. Csar Ezquazabal, 45. ALICANTE 
MULTISYSTEM. San Vcente. 53 ALICANTE. 
COOE-2000. Rarnn y Caja, 3. DEN A 
SILICON VALLEY. Gleta, 
ASTURIA$ 
CASA-RAOIO MIERES. Jersnmo Ibran, 1 |. MIERES 
SOVI ELECTRONICA Cabrales, 31. GIJDN, 
BERNE. Menndez Valdes, 13. GIJON. 
RADIO-NORTE. Utia, 20. OV EGO. 
IMAGEN. Patto Iglesias 83, GIJON 
COMERClAL ARANGO. Maroos de Termielto, 2. AVILE$. 
CUADRADO INFORMATICA. T(xeno, 5. OVIEDO. 
AVILA 
DISCO-70, Plaza Sta Teresa, 1, 
BADAJOZ 
SONIOO RUBIO. Avda Fdez Calzad Ila 10. BAOAJOZ 
RAOIO GRAJERA San JosS, 1 I. ALMENDRALEJO, 
BALEARES 
ERGON. Falang,sta Laport=lta 2 P. MLLORCA 
PROCONT. Extremadura 3t. IBIZA. 
COMPUSHOP. Via Aeman a 11. P MALLORCA 
TEKNOS. Aragsn 30. P. MALLORCA 
CADIZ 
PARODI-DISCOS, Novena s/n 

CASTELLON 
CASIO. S. A. San VK',ente, 6. Avda. Rey Don Jame, 74. 
APARATOS. Mayor, 32, VINARDZ, 
LA CORURA 
PHOTOCOPY. JuaRade Vega 29-31. 
GERONA 
CENTRAL FOTO, Ctra. de San Feh, 28. PLATJA O'ARO. 
GRANADA 
INFORMATICA-ELECTRONICA Melcr Alma§to, 8 
GUADALAJARA 
ABI. Padre Fbx Fes, 3. 
GUIPUZCOA 
SABA Fuenterrab'a, 14. SAN SEBASTIAN. 
AMASONIK. Paseo Cckn, 80-82 IRUN. 
HUELVA 
RAOILUX Concepoon, 6. 
LEON 
MICRO BIERZO. Carlos I, 2. PONFERRAOA 
LOGROIO 
COMPUTER PAPEL. Caslrov'eo. 19. 
LUGO 
MED INFORMATICA Avda Ramon Ferreco, sin. 
MADRID 
HIESA INFOR' ATICA. Cam no Vmateros, 40. 
INSTRUMENTOS MUSICALES ANGEL Plaza Espa, 2 (sal 9). LEGANES. 
COMPUllQUE, Embaadores, 90. 

MALAGA 
TODD INFORMATICA Avda Aula 14, 
INFORMAT1CA EUROPA Moreno Cast, nero (Ed f. Carbonero) FUENGIROLA 
ORGANIZACION EMPRESAS. R cardo S,'iano 35, MARBELLA 
TELEVISION PIIAS. Dr. Eusebio Rarnirez, 2. SAN PEORO ALCANTARA 
MURCIA 
MEMORY SHOP. Lepanto, 1 
NAVARRA 
MICROOROENADORES RAMAR. Navaro V Iada, 7. 
PAMPLONA 
ORENSE 
ALMACENES MENDEZ. Cap  CS, I7. 
PALENCIA 
LA ESFERA, Mayor. 87. 
SANTANDER 
RADIO MARTNEZ. DOclu J=mnez Diaz 13. 
TOLEDO 
CALCO. Angel de AIc.ar, 56. TALAVERA DE LA REINA 
VALENCIA 
RADIO COLON, Con, 7, 
ELECTRONICA MORANT. Jaime Ttxres, 12 GANDIA. 
VALLAIX)LID 
CHIPS AND TIPS. Plaza Tener'a, 11. 
MICROLID. Gregono Femandez 6. 
VIZCAYA 
REMBAT. General Conchs, 12. BILBAO. 
EPROM 2. Juan XX II, 3. SANTURCE. 
ADA COMPUTER. Indendera, 24-26. 

Mercad.o 
comun 

Con el obieto de fomen'ar las rela- 
ciones entre los usuarios de AMSTRAD, 
MERCADO COMUN te ofrece sus p6gi- 
has para publicar los pequeffos anuncios 
que relacionados con el ordenador y su 
mundo se ajusten al formato indicado a 
continuaci6n. 
IFn MERCADO COMUN tienen cabida, 
anuncios de ventas, compras, clubs de 
usuarios de AMSTRAD, programadores, 
y en general cualquier clase de anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envlanos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Aportodo de correos 54.062 
28080 MADRID 
IABSTENERSE PIRATASI 

Vendo Amstrad CPC 664 con 
monitor f6sforo verde, en perfecto estado, 
y regalo programas comerciales valorados 
en m6s de 40.000 ptas. Todo par 85.000 
ptas. Interesados Ilamar a Javier 
Rodriguez. Tel. 34 41 40. Ayala, 5 
(nuevo), 9.°-1. 29002. M61aga. 

Cambio progromos en Barcelona m6s 
de 50 titulos coma the way Exploding fist, 
Gremlins, Skyfo×, Comando II, y muchos 
m6s. Interesados: Antonio Ropero Luceno. 
Avda. Can Serra, bloque X, 51, 3. °, 4. 0 
Hospitalet de Llobregat (Barcelona). Tel. 
(93) 437 1t 10. iMandad lista 

Ofrez¢o monitor en color Amstrod a 
cambio de monitor en f6sforo verde 
Amstracl m6s diferencia. Interesados 
Ilamar al tel. 62 62 88 de Sevilla o escribir 
a Le6n Carlos Alvarez Riao. Genaro 
Parlad, 2, 2. o A. 410013. Sevilla. 

Cambio monitor Amstrad en f6sforo 
verde par monitor en color m6s 10.000 
ptas. Mi monitor est6 comprado en 
Navidad y Ileva Io garantia, las 10.000 
ptas. ias pagar6 contra reembolso. Mi 
direcci6n: Valeriano Garcia Dominguez. 
Las Moreras, 157. 06006 Madrid. 

Vendo impresora BROTHER M-1009, 
con Interface CENTRONICS, 80 columnas, 
50 cps., 12 tipos de letras, posibilidad de 
132 columnas par programa, etc. La 
vendo par 37.000 ptas. Est6 en perfecto 
usa yes a toda prueba. Avisos a: Rafael 
Rodrigo Rubio. Sierra Martes, 10-13. ° Tel. 
(96) 349 38 63. Valencia. 

Desear(a confoctor con usuorios de 
Amstrad (464, 664, 6128) para 
intercambio de juegos, informaci6n, 
utilidades, etc. Tengo m6s de 100. 
Interesados enviar relaci6n de los que 
tienen al apartado de correos 50.272 de 
Madrid. Contestar6 todas las cartas. 



Con el objeto de fomentar las rela- 
ciones entre los usuarios de AMSTRAD, 
MERCADO COMUN te ofrece sus pgi- 
has para publicar los pequeos anuncios 
que relacionados con el ordenador y su 
mundo se aiusten al formato indicado a 
continuaci6n. 
En MERCADO COMUN tienen cabida, 
anuncios de ventas, compras, clubs de 
usuarios de AMSTRAD, programadores, 
yen general cualquier clase de anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envianos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
IABSTENERSE PIRATASI 

Cambio o vendo juegos de disco o de 
cassette. Tengo unos 70 juegos. (Entre ellos 
Comando, Knight Lore, Manic Miner, Dun 
Darach, etc.) Interesados Ilamar a 
Fernando Ja6n Julian. Rub6n Dario, 17, 
3. D, 3. a Tel. 33 10 05. (Preferentemente de 
Zaragoza.) 

Poseedor de Amstrad estaria 
interesado en intercambios de programas 
con usuarios de cualquier tipo de 
Amstrad, en cassette o en disco. 
Interesados escribir a: Juan Carlos Benitez. 
Anselmo Clav6, 5, 3. o D. Palam6s 
(Gerona). 

Vendo el siguiente Iote: Modulador TV 
CPC (464/472), totalmente nuevo, sin 
estrenar, en embalaje original. Fecha de 
compra: 30-5-86.25 juegos a elegir entre 
m6s de 170 (enviar6 lista). Libro ¢Hacia la 
inteligencia artificial con Amstrad. TodD 
por 10.000 ptas. El modulador es un 
regalo y no me interesa. Interesados 
escribir a: Manuel Angel S6nchez Costa. 
Avda. Amilcar Barca, 29, 2. o D. 11009 
C6diz. 

Centro Comercial Guadalupe 
Ctra. Canillas, 136-1." planta 
Tel. 200 80 65 MADRID 

Centro Comercial El Bulevar 
La Moraleja 
Tel. 654 16 12 MBRIB 

Tambin abierto domingos de 10 a 2 
Centro Comercial Ciudad Sto. Domingo 
Ctra. de Burgos, km 28. 
Tel.: (91) 622 12 89 
Algete (Madrid) (Central) 

Vend0 impresora Seikosha GP 250 X, 
con interfaces serie y paralelo, 80 
columnas, 64 caracteres programables y 
cuatro tipos de letra. Manual de 
instrucciones. Precio: 30.000 ptas. 
(negociables). Llamar al tel. 242 41 21 de 
Madrid. Preguntar por Juan. 

Ha surgido un club de usuarios del 
Amstrad en Zaragoza. Interesados en 
formar parte de 1, escribir a: David Used. 
Mariana Pineda, 22, 6. o A. S0015 
Zaragoza. 

• • • • • • • • • • • • • • • 
Vendo Amstrad 464 monitor f6sforo 
verde 12 juegos y manuales. Perfecto 
estado, poco uso, todD por 50.000 ptas. 
interesados Ilamar al tel. 204 70 16 de 
lunes a viernes de 8 a 14 horas. S6bados 
de 8 a 13 horas. Preguntar por Javier 
(Madrid). 

,r i i 
Servicio Tcnico 
Para AMSTRAD 
en Galicia, 
Le6n 
y Asturias. 
C/ Magda/ena, 213 
El Ferro/ 
Tel.: (981) 35 84 32 

LAS ASIGNATURAS PENDIENTES ,' 

• SOClALES • NATURALES- MATEMATICAS • LENGUAJE • 

DE: 5' 6" 7'1/8' EGB 

Programa 
Programa 
Programa 
ponible en 

para ejercicios de ortografia .ED.O_RTO_ 
para ejercicios de atencibn y comprensibn _E.D.A_C.L.E_ 
pare ejercitar el instrumento lector .EJ_EI.L.E. 
MSX y AMSTRAD,. |800 ptas Cassette __ 2750 Disco 

* PRECIO ESPECIAL )) CURSO COMPLETO EGB ..... 3500 ptas. 

PEDIDOS :GOSLiNE CUARTELES,431 °- 20002-MALAGA- TEL.311877 

, ......... regalo de un reloj por cada cassette o disco 



l 
I 
I 
l 
I 
l 
| 

LUGAR 
DFSTINADO 
PARA 
El SFLLO 

TRIANGULO ELASTICO 
ELIPSE ELASTICO . 
DIAMANTE ELASTICO 
POLIGONO ELASTICO 
HEXAGONO ELASTICO 
OCTOGONO ELASTICO 

I 
I 
I 
I 
i 
n 
i 
l 
Sl NO I 
NO I 

SI NO 
SI NO ] 
SI NO I 

CUBO ELASTICO 
PIRAMIDE ELASTICA 
CIRCUNFERENCIAS 
CIRCULOS RELLENOS 
CAJAS RELLENAS 
ELIPSES RELLENAS 
CUNAS 
SIMULADOR DE CORTES 

NO 
SI I NO._  
s[ I SZ_L____i 
, S! I NO__[_ --I 
SI I NO   
NO 

$I 

I SI 

DISENO DE ZOOM 

IMAGEN ESPEJO E INVERTIDA 
FONDO DE REFERENCIA 
REJILLA DE FONDO 

OIION DISPLAY_X Y__ 
RELLENADO CON COLOR 

LAVADO DE COLOR 
VOLCADO PANTALLA RESIDENTE 
DIBUJO DE BORDES EN 3 D 

TEXTO 

9 TAMANOS DE BROCHA 
18 TOBERAS MOSTRADORAS 

4 MEZCLAS BASICAS 
VARIADOR DE MEZCLAS 
SOMBREADO DE MEZCLAS XOR 
FICHERO ICONOS RESIDENTES 
FICHERO RELLENOS RESIDENTES 

26 COLORES DE PAPEL 
-PALETA D--15 TONOS DE COLO--R 

POSICIONAMIENTO DE PUNTO 

RAYOS DESDE UN PUNTO FIJO 

I SI S! 
s, I NO 
SI i NO 
SI NO 
SI NO 
SI SI 
SI NO 
____ SI NO 
SI NO 
SI S| 
SI NO 
S( NO 
SI NO 
SI NO I 
SI NO 
SI NO 
SI NO 
SI NO J 
SI NO 
SI NO l 

HOBBY P11,$l$, $..tI. 
Apartado de Correos 
ALCOBENDAS 
(Madrid) 

DIBUJO REFLEJADO_(_ESPEJO  S NO I 
FUNCION HOME SI NO I 
CONTROL DESDE TECLADO I s[ m [ 
CONTROL CON JOYSTICK__ __ 
DISPONIBLES MODOS 1 V 2  ? I 
DEBIDO A LA FALTA DE ESPACIO NO PODEMOS LISTAR LAS OTRAS 
40 FtlNCIONES MAS QUE IVUFTRO LAPtZ,SS CAPAZ DE HACER. 

N.* 232 

l I 
| 

Ofites 
Informtica 

P 

./ 



Solicitud de cintas y n. atrasados 

[] Deseo recibir en mi domicilio los siguientes nOmeros atrasados de Microhobby 
Amstrad al precio de 160 ptas. cada uno 
El nOmero 4 est6 agotado. 
 [] Deseo recibir la(s) cinta(s) de programas que Indico a continuaci6n. Cada una de 
M el estas cintas Ileva grabados los publicados Microhobby Amstrad durante 
programas 
par 
cuatro nmeros consecutivos (1 al 4, 5 al 8, 9 al 12, etc.) y su precio es de 756 ptas. (IVA incluido). 

¢ N6meros del ol Ilnclusive) N0meros del al (inclusive) 
N6meros del al (inclusive) N6meros del al finclusive) 
N6meros del al (indusive} NOmeros del ol (inclusive) 
NOMBRE Fecha de nacimienlo 
APELLIDOS Domicilio 

Con el objetc 

LOCALIDAD PROVINCIA 

ciones entre los u: 
ME?CA DO COM, 
nas para publicar 
que relacionados 
mundo se ajusten 
continuaci6n. 
En MERCADO C 
anuncios de vent 
usuarios de AMST', 
yen general cualc 
que pueda servir 
lectores. 
Envianos tu anunco mecanograha ado 
a: HOBBY PRESS, S.A, 
AMSTRAD SEMANAL, 
Apartado de correos 54.062 
28080 MADRID 
IABSTENERSE PIRATASI 

C. POSTAL TELEFONO 
Eres suscfiptor de Microhobby Ams'ad? 
Marco con una ix) en el casillero correspondiente la farina de pogo que m6s me convie- 
rle. 
13 Tarleta de cr,6dito n. ° 
.q Vsa [] American Express 13 Master Charge 
Fecho de caducidad de Io taffeta 
13 Tal6n bancario a nombre de HOBBY PRESS, S.A. 
[] Giro Postal a hombre de HOBBY PRESS, S. A., N. ° del giro 
lq Contro reembolso (s61o paro n6meros atrosados, supone 75 peselos de gostos de envio). 

Cambio ovendo juegos de disco o de 
cassette. Tengo unos 70 juegos. (Entre elias 
Comando, Knight Lore, Manic Miner, Dun 
Darach, etc.) Interesados Ilamar a 
Fernando Ja6n Juli6n. Rub6n Dario, 17, 
3. °, 3. a Tel. 33 10 05. (Preferentemente de 
Zaragoza.) 

PROFESION 

Centro Comercial Guadalupe 
Ctra. Canillas, 136-1.  planta 
Tel. 200 80 65 MADRID 

Centro Comercial El Bulevar 
La Moraleja 
Tel. 654 16 12 MADRID 

Tambin abierto domingos de 10 a 2 
Centro Comercial Ciudad Sto. Domingo 
Ctr. de Burgos, km 28. 
Tel.: (91) 22 12 8 
Algete (Mdrid) (Central) 

Fecha y firma 

Servicio T6cnico 
Para AMSTRAD 
en Galicia, 
Le6n 
y Asturias. 
C/ Magdalena, 213 
El Ferrol 
Tel.: (981) 35 84 32 

LAS ASIGNATURAS PENDIENTES o' 
• SOClALES. ATUALES • MATEMAICAS • LEGUAe • 
DE: 5" 6" 7'1 8" EGB 
Programa para ejercicios de ortografia .E.D.O.R.T.O. 
Programa para ejercicios de atencibn y comprensibn _E_D.A.C_L_E. 
Programa para ejercitar el instrumento lector .E_ .J _E_ I.L_ E. 
en MSX y AMSTRAD,, |800 ptas Cassette __ 2750 Disco 

((PRECIO ESPECIAL )) CURSO COMPLETO EGB ..... 3500 ptas. 

• 
PEDIDOS :GOSUNE CUARTELES,43-1 °- 29002- MALAGA- TEL.311877 

, , ...... regalo de un reloj por cada cassette o disco 



r 

FUNCIONES 

UNICO MENU DE PANTALLA 
ARRASTRE OBJETOS PANTALLA 
TRASLADO OBJETOS PANTALLA 
TRASLADO DE CURSOR 
CAJAS ELASTICAS 
LINEA ELASTICA 

TRIANGULO ELASTICO 
ELIPSE ELASTICO . 
DIAMAN-TE ELASTICO 

" OTROS 
ESP - 
SI NO 

SI NO I 
SI NO 
SI S[ 
SI SI 
Sl I NO 
SI I NO 
SI i NO [ 
SI I NO  

POLIGONO ELASTICO 
HEXAGONO ELASTICO 
OCTOGONO ELASTICO 
CUBO ELASTICO 
PIRAMIDE ELAS_TICA 
CIRCUNFERENCIAS 

CIRCULOS RELLENOS 

CAJAS RELLENAS 
ELIFSESRELLENAS 

CUNAS 
SIMULADOR DE CORTES 
DISENO DE ZOOM 

IMAGEN ES_PE.IO E INVERTIDA 
FONDO DE REFERENCIA 
RFILLA DE FONDO 
OPCION DISPLAY X, Y 
RELLENADO CON COLOR 
LAVADO DE COLOR 
VOLCADO PANTALLA RESIDENTE 

DIBUJO DE BORDES EN 3 D 
TEXTO 

9 TAMANOS DE BROCHA 

18 TOBERAS MOSTRADORAS 
4 MEZCLAS BASICAS 

VARIADOR DE MEZCLAS 
SOMBREADO DE MEZCLAS XOR 
FICHERO 1CONOS RESIDENTES 
FICHERO RELLENOS RESIDENTES 
26 COLORES DE PAPEL 
PALETA DE 15 TONOS DE COLOR 
POSICIONAMIENTO DE PUNTO 
RAYOS DESDE UN PUNTO FIJO 
DIBUJO REFLEJADO tESPEJO) 
FUNCION HOME 
CONTROL DESDE TECLADO 
CONTROL CON JOYSTICK 
DISPONIBLES MODOS l Y 2 

$I 

SI 
NO 
? 

SI 
SI 

, | J| 

Ofites 
Inform  tica 

! • ) 



CPC-6128 

SISTEMA COMPLETO CON MONITOR 
EN FOSFORO VERDE, MANUAL EN 
CASTELLANO, GARANTIA OFICIAL 
AMSTRAD ESPAA, DISCO CON SIS- 
TEMA OPERATIVO CP/M 2.2 Y LEN- 
GUAJE DR. LOGO, DISCO CON SISTE- 
MA OPERATIVO CP/M PLUS (CP/M 
3.0) Y UTILIDADES, DISCO CON SIETE 
PROGRAMAS DE OBSEQUIO 

84.900 Pts. + 

SISTEMA COMPLETO IGUAL AL ANTE- 
RIOR PERO CON MONITOR EN COLOR. 

119.900 Pts. + I.V.A. 

ES PAIJA 

Avd, de MediterrOneo, 9, 28007 MADRID. 
Tels. 433 45 48 - 433 48 76 
Delegaci)n Catalu5a: C/. Tarragona, 110, 
08015 BARCELONA- Tel. 325 10 58 



